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This publication contains information required by system and 
application programmers to use the data management access method 
functions of MVS/Extended Architecture Data Facility Product, 
Program Number 5665-284. It describes and defines the data 
management macro instructions~except for VSAM (virtual storage 
access method)-available in the assembler language. See 
"Related Publications" on page iv for the related VSAM 
publications. 


This publication is divided into these parts: 


® "Introduction" on page 1 defines and discusses macro 
instructions and the rules to be followed when when coding 
them, and the notational conventions used throughout the 
publication. 


e "Macro Instruction Descriptions" on page 8 defines and 
discusses the functions of each macro instruction and how 
each must be coded. The macro instructions are presented in 
alphabetic order. The standard form of each is described 
first, followed by the list and execute forms. The list and 
execute forms are available only for those macro 
instructions that pass parameters ina list. 


° Appendix A, “Status Information Following an Input/Output 
Operation" on page 190, defines and discusses the location, 
alignment, and description of the symbolic fields in the 
data event control block and the event control block. 


e Appendix B, "Data Management Macro Instructions Available by 
Access Method" on page 202, defines and discusses the macro 
instructions available for each of the data management 
access methods. 


e Appendix C, "Device Capacities" on page 203, defines and 
discusses device capacities as a guide to coding the block 
Size and logical record length operands in the DCB macro 
instruction. 


e Appendix D, "DCB Exit List Format and Contents" on page 206, 
defines and discusses the format and content of the data 
control block exit list. 


e Appendix E, "Control Characters™ on page 208, defines and 
discusses the control characters used to control spacing and 
skipping Cprinters) and stacker selection (card read punch 
or card punch). 


e Appendix F, "Data Control Block Symbolic Field Names®™ on 
page 21l, defines and discusses the location, alignment, and 
description of the data control block symbolic field names. 


e Appendix G, "PDABD Symbolic Field Names®™ on page 228, 
defines and discusses the location, alignment, and 
description of the PDABD dummy control section. 


e "Glossary of Terms and Abbreviations" on page 229 defines 


and discusses the definitions of the terms and abbreviations 
used in this publication. 
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PREREQUISITE KNOWLEDGE 


To use this book you apie have Knowledge of assembler ponguae 
as described in Asse = : min 





2s iC) 
, GC26- 4037, and Assembler H Version 2 

» 8026-9036, and of job control 
language (JCL) as explained in / 
User's Guide, GC28-1351, and Mo¢ Extended Architecture Jel 
Reference, GC28-1352. 


If you Know how to write assembler language programs and use job 
control statements, you can use this book and MY5/Extended 

j » GC26-4013, to write 
programs that create and process data sets. 


REQUIRED PUBLICATIONS 


RELATED PUBLICATIONS 


iv MVS/XA Data Admi 


You should be familiar with the information presented in the 
following publications: 





ASSempri€é a = Lon 
Reference, GC26-4037 


. b] HY : 2 Applicat; p TCC Trees 
$C26-4036 


e MVSZExtended Archi tecture Data Administration Gul de, 
GC26-4013 


2upervisor Services and Macro Instructions, GC28-1154 


e MVSZExtended Architecture JCL User's Guide, GC28-1351 
° MVSZExtended Architecture JCL Reference, GC28-1352 


Within the text, references are made to the publications listed 
in the table below: 


! Order 
Short Title Publication Title Number 


Assembler H V2 SC26- 6036 
Application 
G6C26- 4037 


Programming: 

Guide 
GC26-4012 
GC28-1143 | 


Assembler H V2 
GC26-4013 
















Application 
Programming: 
Language 
Reference 

















Data 
Administration 
Guide 
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Short Title Publication Title 
paneer iseawet Rial 
Product Description 


Printer Product j j 
: . 
LBM 3800 Printing Subsystem 


Description 
IBM 3800 Printing 
Programmer's Guide 


Subsystem 
Programmer's 
Guide 


IBM 3800 Printing 
Subsystem 
Programmer's 
Guide 


IBM 3890 Document 
Processor Machine 
and Programming 
Description 


IBM 4245 Printer 
Model 1 Component 
Description and 
Operator's Guide 


IBM 4248 Printer 
Model 1 . 
Description 
















Initialization 
and Tuning 


Initialization and Tuning 


aystem Programming Library: 
JCL User's Guide 
JCL Reference 
MV57Extended Architecture 
Magnetic Tape Labels and 





Magnetic Tape 
Labels and File 


Structure 
Administration 


Open/Close/EQV 
Logic 









OS/7VS IBM 3886 
Optical Character 
Reader Model 1 

Reference 


OS/VS Mass 
Storage System 
(MSS) Planning 
Guide 


OS/VS Mass 
Storage System 
CMSS) Services: 
General 

Information 


OS/VS Mass 
Storage System 

(MSS) Extensions 
Services: 
Reference 
























Order 
Number 


GA24-3936 


GC26-3846 


SH35-0061 


GA24-3612 


GA33-1541 


GA24-3927 
GC28-1149 


GC28-1351 
GC28-1352 


GC26-4003 


LY26-3966 


GC24-5101 


GC35-0011 


GC35-0016 


SH35-0036 


Preface 
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vi 








Order 


Short Title Publication Title Number 


Programming j GC21-5097 
Support for the IBM 3505 Card Reader and the 

IBM 3505 Card IBM 3525 Card Punch | 

Reader and the 

IBM 3525 Card 

Punch 


Programming Support for the 
RACF General Resource Access Control GC28-0722 
Information Facility CRACF): General 
Manual j 





GC28-1159 








—— 


Supervisor 
Services and 


GC28-1154 


Macro 
Instructions 


System Codes 
System—Data MVS/Extended Architect 6026-4010 
Administration System—Data Administ tj 


System Generation GC26-4009 





GC28-1157 


GC28-1150 
and 
GC28-1151 


System Macros and 
Facilities 










GC28-1376 
and 

GC28-1377 
GC26-4018 


System Messages 









Utilities 









VSAM 
Administration 
Guide 


VSAM 
Administration: 

Macro Instruction 
Reference 


GC26-4015 






GC26-4016 
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| RELEASE 1.2 LIBRARY UPDATE,» JANUARY 1987 


| SERVICE CHANGES 


Information has been added, corrected, or deleted to reflect 
technical service changes. 


RELEASE 1.2, FEBRUARY 1984 


This publication, formerly titled 
Management Macro Instructions, 1s now titled Hs/Extended 


s * 2 
a ry - ’ 
: a J vata Aamin : on: Ma ° On a 


NEW PROGRAMMING SUPPORT 


NEW ENHANCEMENTS 


This manual has been updated to reflect the following features 
for ISO/ANSI/FIPS magnetic tape labels: 


6 A maximum block size limit of 2048 bytes. 


® The RECFM parameter of the the DCB macro no longer supports 
undefined record formats. 


e A new variable-length spanned data set record format for 
ISO/ANSI/FIPS data sets. 


Other support information consists of magnetic tape label 
symmetry restrictions 


Modifications have been made to the SETPRT macro to support the 
IBM 3800 Model 3 Printer in Model 1 compatibility mode. 


Modifications have been made to the SETPRI macro to support the 
IBM 4248 Printer. 


Note: The IBM 3262 Model 5 Printer is afforded the same support 
as that provided for the IBM 4248 Printer. However, the use of 
an IBM 3262 Model 5 Printer dictates that entries exist in the 
IBM 4248 Printer UCS Image Table for the IBM 3262 Model 5 
Printer band(s)/ aliasCes) used on the host system. These image 
table entries must be generated by the user as part of the IBM 
3262 Model 5 installation procedure. 


RELEASE 1.1,OCTOBER 1983 


NEW DEVICE SUPPORT 


e Modifications have been made to the SETPRT macro to support 
the IBM 3800 Model 3 Printer in compatibility mode. 


e Modifications have been made to the section called 
ae ane Units" to support the IBM 3430 Magnetic Tape 
ni 

e Modifications have been made to the SETPRT macro to support 
the IBM 4245 Printer. 


Summary of Changes vii 












































































a aN is 
ie ‘ iH 
be A : / 
- 7 Ne y: 
“Sey eet Supe Oe 
{ 
| 
\ 
| 
t 
- | 
| 
| 
i 
1 
| 
| 
{ 
| 
{ 
i 
' 
. 
: 
i 
i 
i 
: 
| 
t 











Introduct ion e e @ e e e e@ @ e e e @ e @ ® e ® e 
ISO, ANSI, and FIPS” ‘Labels Go aks Gay. ae ake hey. le 0) 28 oe 
Coding Aids a ; 

Bold Type : 

Underscored Lowercase Letters. 
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Comprehensive Example Bt eae ce, Bae ie 
Macro Instruction Format 
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Rules for Continuation Lines 
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Completion Codes : 

BSP—Backspace a Physical “Record (BSAM—Magnetic Tape and 
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Completion Codes 

gp sete a Buffer. Pool (BDAM, ‘BISAM, BPAM, BSAM, QISAM, 
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BUILDRCD—Build a Buffer Pool and a ‘Record Area (QSAM) ; 

BUILDRCD—List Form ae. a x 

BUILDRCD—Execute Form : 

CHECK——Wait for and Test Completion of a Read or Write 
Operation CBDAM, BISAM, BPAM, and BSAM) : 

CHKPT—Take a Checkpoint for Restart within a “Job. Ste 
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BSAM, QISAM, and QSAM are 

CLOSE—List Form ar ee 

CLOSE—Execute Form 

CNTRL—Control On-line Input/Output. Device (BSAM and QSAM) 
DCB—Construct a Data Control Block CBDAM) y 
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DCB—Construct a Data Control Block CBSAM) 
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ESETL—End Sequential Retrieval (CQISAM) 

FEOV—Force End of Volume CBSAM and QSAM) 
FIND—Establish the ee of a Data Set Member (BRAM). 

Completion Codes 
eagy ee a Buffer to. a ‘Pool CBDAM, “BISAM, BPAM, and 
cea oe a Dynamically Obtained Buffer (BDAM and 
FREEPOOL—Release a ‘Buffer Pool “(BDAM, BISAM, BPAM, BSAM, 

QISAM, and QSAM) : ; : 
GET—Obtain Next Logical Record CQISAM) 
GET—Obtain Next eee Record (QSAM) 

GET Routine Exits a ee ee ce ee 
GETBUF—Obtain a Buffer CBDAM, BISAM, BPAM, and BSAM) 
GETPOOL——Build a Buffer Pool (BDAM, BISAM, BPAM, BSAM, 

QISAM, and QSAM) ee eR ee ee 
MSGDISP—Message Display (Drive Ready) 
MSGDISP—Displaying a peony Meeoeer ; 

MSGDISP-——-List Form eg . x wi. 
MSGDISP—Execute Form a. tae oe 

Completion Codes ; ‘ 
NOTE—-Provide Relative Position (BRAM and ‘BSAlt—Tape and 

Direct Access Only) ; ; 

Completion Codes 


Contents 
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OPEN—Logically Connect a ee Set sae ere BPAM, 
BSAM, QISAM, and coe Be in Be Bo Bs. 

OPEN—List Form ‘ 

OPEN—Execute Form 

PDAB—Construct a Parallel Data ‘Access Block CQSAM) 

PDABD—Provide Symbolic Reference to a Parallel Data 
Access Block (QSAM) : 


POINT—Position to a Relative Block CBPAM and /BSAM—Tape 


and Direct Access Only) 
Completion Codes ; 

PRTOV—Test for. Printer Chiao Overflow. (BSAM “and 
QSAM—Online Printer and 3525 Card Punch, Print Feature) 
PUT—Write Next Logical Record pease tense ke ee ON ee en “Re 

PUT Routine Exit 
PUT—Write Next Logical “Record CQSAM) 
PUT Routine Exit _. d 
PQSAM) a Record from an Existing Data Set CQISAM ‘and 
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READ—Read a Block (BDAM) 


READ—Read a Block of Records’ (BISAM)- 
READ—Read a: Block C(CBPAM and BSAM) 2 
READ——-Read a Block aes ead: of Keyed BDAM Data Set 
Using BSAM) : 
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RELEX—Release Exclusive Control (BDAM) i Re 
Completion Codes ; 
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Input) ; ae ‘ 
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SETPRT—Execute Form 
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Message Buffer Format a 
SYNADRLS—Release SYNADAF Buffer and Save Areas CBDAM, 
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SYNCDEV—Synchronize Device ; 
SYNCDEV—List Form ; 
SYNCDEV—Execute Form 
Completion Codes . 
TRUNC—Truncate an Output Buffer CQSAM Output—Fixed- or 
Variable-Length Blocked Records) 
EeIay for One or More Events (BDAM, BISAM, BPAM, and 
WRITE—Write a Block (BDAM) 
WRITE—Write a Logical Record or Block of Records. CBISAM) 
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WRITE—Write a Block (Create a BDAM Data Set with. BSAM) | 
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WRITE—List Form : 
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XLATE—Translate to and from ISCII/ASCII (BSAM and QSAM) 
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Before using this publication, familiarize yourself with the 
information in ini i j j 


IBM provides a set of macro instructions so that you can 
communicate service requests to the data management access 
method routines. These macro instructions are available only 
when the assembler language is being used, and they are 
processed by the assembler program using macro definitions 
supplied by IBM and placed in the macro library when the 
operating system is generated. 


The assembler program expands each macro instruction into 
executable, assembler language instructions or data, and shows 
you the exact macro expansion in the assembler listing. The 
executable instructions generally consist of branches around 
data fields, load register instructions, and either branch 
instructions or supervisor calls (SVC) that transfer control to 
the proper program. The data fields in each macro instruction 
are parameters that are passed to the access method routine. 


You can use the utility program IEBPTPCH to get a list of macro 
definitions from SYS1.MACLIB, the library in which the macro 
definitions are stored. For a description of IEBPTPCH, see 


Before coding programs that request supervisor services, 
familiarize yourself with the information contained in 

j i j Also, if you are 
writing programs for specialized applications such as 
telecommunications, graphics, character recognition, or to use 
VSAM Cvirtual storage access method), use the appropriate 
publication listed in the preface that describes the specific 
access method and/or device type you are working with. 


The operation of some macro instructions depends on the options 
selected when the macro instruction is coded. For these macro 
instructions, either separate descriptions are provided or the 
differences are listed within a single description. If no 
differences are explicitly listed, none exist. The description 
of each macro instruction starts on a right-hand page; the 
descriptions that do not apply to the access methods being used 
can be removed. Appendix B, "Data Management Macro Instructions 
Available by Access Method" on page 202 lists the macro 
instructions available for each access method. 


1S0, ANSI, AND FIPS LABELS 








This publication refers to tape labels defined by the 
International Organization for Standardization (ISO), the 
American National Standards Institute (ANSI), and the Federal 
Information Processing Standard (FIPS). In general, 
ISO/ANSI/FIPS labels are similar to IBM standard labels, and, 
unless otherwise specified, the term "standard label," refers to 
both IBM standard labels and ISO/ANSI/FIPS standard labels. IS0 
labeled tapes are coded in the Organization Standard Code for 
Information Interchange CISCII), and ANSI labeled tapes are 
coded in the American National Standards Code for Information 
Interchange (ASCII), while IBM labeled tapes are coded either in 
the extended binary-coded-decimal interchange code CEBCDIC) or 
in binary coded decimal (BCD). For further information about 


ISO/ANSI/FIPS labels, see 
atructure. 
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CODING AIDS 


BOLD TYPE 





Bold type is used for elements that you must code exactly as 
they are shown. These elements consist of macro names, 
keywords, and these punctuation symbols: commas, parentheses, 
and equal signs. Examples: 

# DCB 

e CLOSE »»»,TYPE=T 

® MACRF=(PL,PTC) 


e SK,5 


UNDERSCORED LOWERCASE LETTERS 


BRACKETS 


OR SIGN 


BRACES 


Underscored lowercase letters are used for elements for which 
you code values that you choose, usually according to 
specifications and limits described for each parameter. 
Examples: 


e number 
. . ~id 
e count 


Brackets, [ 1], enclose optional elements that you may or may not 
code as you choose. Examples: 


° [length] 
° [MF=E] 


The OR sign, |, separates alternative elements. Examples: 
® {»REREAD|, LEAVE] 
e [length|'"S"] 


Braces, { }, enclose alternative elements from which you must 


choose one, and only one, element. Examples: 
6 BFTEK={S|A} 
e {K|D} 


e faddress|1S$]0} 


Sometimes, alternative elements Cespecially complicated 
Pa a are grouped in a vertical stack of braces. 
xample: 


MACRF={{(RIC|P1)} 
CC(WECTPIL])} 
{(RL(C1,WiC])}} 


In the examples above, you must choose only one element from the 
vertical stack. 
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ELLIPSES 








Ellipses, ..-,» indicate that elements may be repeated. 


Example: 


UNDERSCORED BOLD 


(debaddr» [Coptions)1],...) 


Underscored BOLD elements indicate alternative choices that are 
eee mec if you don't want to code the optional element. 
xamples: 


BLANK SYMBOL 


CEROPT={ACC|SKP | ABE}] 
[BFALN={F 1D} 1 


The blank symbol, b, indicates omitted operands. Example: 


CS 


COMPREHENSIVE EXAMPLE 


MF=(E,{address|(1)}) 


In this example, MF=(E,» must be coded exactly as shown. 
Then, either address or (1) must be coded. (The parentheses 
around the 1 are required.) Finally, the closing 

parenthesis must be coded. Thus, MF=(E,(1)) night be coded. 


RECFM= SEU etSia 
EVEBISITIBSIBTICAIMI3 
{DIBIE 
{FLBIS|TIBS|BTILAIMI}3 


In this example, you must first choose one of the four 
alternative elements shown on each line. Then, you must 
choose one of the major elements. Assuming you selected the 
major element beginning with F, you would code F; then you 
could choose one of B, S, T, BS, or BT. Finally, you could 
select either A or M. Thus, you might code any one of the 
following: RECFM=FBTM, RECFM=FA, or RECFM=F. 


MACRO INSTRUCTION FORMAT 


Data management macro instructions are subject to the rules of 
assembler language and are written in the following format: 






Symbol or 
blank 







Macro name None, one or more 
operands separated 


by commas 
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Use the operands to specify services and options you need and - 
code them according to the following general rules: fo 


| | | -_ 
e If the operand you select is shown in bold capital letters XL 
(for example, POCRESHE?s code the operand exactly as shown. 


e If the operand you select is a character string in bold type 
(for example, if the type operand of a READ macro 
instruction is SF), code the operand exactly as shown. 


e If the operand is shown in underscored lowercase letters 
(for example, dcb address), substitute the indicated 
address, name, or value. 


8 If the operand is a combination of bold capital letters and 
underscored lowercase letters (for example, LRECL=absex 
code the capital letters and equal sign exactly as ehoun sad 
substitute the appropriate address, name, or value for the 
underscored lowercase letters. 





e Code commas and parentheses exactly as shown. 


Note: Omit the comma that follows the last operand in a 
statement. Brackets and braces show how to use commas and 
parentheses the same way they show how to use operands. 


6 Several macro instructions contain the designation '"S'. Use 
the apostrophe on both sides of the S operand. 


If you need to substitute a name, value, or address, the 
notation you use depends on the operand you are coding. The 
following two examples show how an operand can be coded: 


DDNAME=symbol 
In this example, you can only code a valid 
assembler-language symbol for the operand. eo 
—RX-Type Address, (2-12), or (1) Nae” 


In the above example, you can substitute an RX-type 
address, any general register 2 through 12, or general 
register 1 


The following examples show what each notation means and how you 
can code an operand: 


This notation indicates that the operand can be any valid 
assembler-~language symbol. 


This notation indicates that the operand can be any decimal 
digit uP to the maximum value allowed for the specific 
operand. 


(2-12) 
This notation indicates that the operand can be any of the 
general registers 2 through 12. All register operands must 
be coded in parentheses; for example, if you code register 
3, use the form (3). If you want to use one of the 
registers 2 through ]2, code it as a decimal digit, a 
symbol Cequated to a decimal digit), or an expression that 
yields a value of 2 through l12. 


(]) 
When this notation is shown, general register ] can be used 
as an operand. The register can be specified as a decimal 
digit ] enclosed in parentheses. When register ] is used 
as an operand, the instruction that loads the parameter 
value into the register is not included in the macro ; 
expansion. 4 





(0) | 
When this notation is shown, general register 0 can be used 
as an operand. The register can be specified as a decimal 
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digit Q enclosed in parentheses. When register 0 is used 
as an operand, the instruction that loads the parameter 
value into the register is not included in the macro 
expansion. 


When this notation is shown, the operand can be specified 
as any valid assembler-language RX-type address. The 
following shows examples of each valid RxX-type address: 


Name Operation Operand 

ALPHA] L 1,39¢4,10) 
ALPHA2 L REG1,39(€4, TEN) 
BETA] L 2,ZETACG) 

BETA2 L REG2, ZETACREGG) 
GAMMA] L 2,ZETA 

GAMMA2. L REG2,ZETA 
GAMMA3 L 2,=F*'1000° 
LAMBDAIL L 3,20¢€,5) 


Both ALPHA instructions specify explicit addresses; REG] 
and TEN are absolute symbols. Both BETA instructions 
specify implied addresses, and both use index registers. 
Indexing 1s omitted from the GAMMA instructions. GAMMA] 
and GAMMA2 specify implied addresses. The second operand 
of GAMMA3 is a literal. LAMBDA] specifies an explicit 
address with no indexing. 


When this notation is shown, the operand can be specified 
as any address that can be written as a valid 
assembler-language A-type address constant. An A-type 
address constant can be written as an absolute value, a 
relocatable symbol, or a relocatable expression. Qperands 
that require an A-type address are inserted into an A~type 
address constant during the macro expansion process. For 
more details about A- ~ type address constants, see Assemb] ¢ 








When this notation is shown, the operand can be an absolute 
value or expression. An absolute expression can be an 
absolute term or an arithmetic combination of absolute 
terms. An absolute term can be a nonrelocatable symbol; a 
self-defining term, or the length attribute PO rerenee: For 
more aotet about. absolute expressions, ler # 






When this notation is shown, the operand can be a 
relocatable symbol or expression. A relocatable symbol or 
expression is one whose value changes by nif the program 
in which it appears is relocated n bytes away from its 
originally assigned area of storage. For more details 
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RULES FOR REGISTER USAGE 


Many macro instruction expansions include instructions that use 
a base register previously defined by a USING statement. The 
USING statement must establish addressability so that macro 
expansion can include a branch around the in-line parameter 
list, if present, and see the data fields and addresses 
specified in the macro instruction operands. 


Macro instructions that use a BAL or BALR instruction to pass 
control to an access method routine, normally require that 
register 13 contain the address of an 18-word register-save 
area. The READ, WRITE, CHECK, GET, and PUT macro instructions 
are of this type. 
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Macro istroétionesthat use a supervisor call (SVC) instruction 


‘to pass control to an access method routine may modify’ general —_ 
‘registers 0, 1, 14, and 15 without restoring them. Unless ue 
otherwise specified in the macro instruction description, the oe 


“ gentents of these registers are undefined when the system 
returns: control ee the problem program. 


When an Sperand is specified asa Reuietar: the problem program 
must have inserted the value or address to be used into the 
register as follows: , 


e Unless the macro instruction description states otherwise, 
and the register is to contain a value, that value must be 
placed in the low-order portion of the register. Any unused 
bits in the register should be set to zero. 


@ If the register is to contain a 2l-bit address, thevaddréss 
must be placed in the low-order three bytes of the register, 
and the high-order byte of the register should be set to 
zero. 


® If the register is to contain a 3l-bit address, the address 
must be placed in the low-order 31 bits of the register, and 
the high-order bit of the register should be set to zero. 


Note that, if the macro instruction accepts the RX-type address, 
the high-order byte of a register can be efficiently cleared by 
coding the parameter as 0 (reg) rather than merely as (reg).} 
Then the macro instruction expands as: 

LA parmreg, 0Creg) by macro 


rather than: 


LA reg,0Creg) by user 
and ‘ ; 
LR parmreg,reg by macro 


RULES FOR CONTINUATION LINES 


The operand field of a macro instruction can be continued on one 
or more additional lines as follows: 


1. Enter a continuation character (not blank, and not part of 
the operand coding) in column 72 of the line. 


2. Continue the operand field on the next line, starting in 
eesti 16. All columns to the left of column 16 must be 
ank. 


a ess 
a 


her F 
: | | eZ 
: For 31-bit addressing mode expansion, the high-order bit of 

a register can be cleared using this same technique. 
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The operand field being continued can be coded in one of two | 
ways. The operand field can be coded through column 71, with no 
blanks, and be continued in column 16 of the next line, or the 
operand field can be truncated by a comma, where a comma 
normally falls, with at least one blank before column 71, and 
then be continued in column 16 of the next line. An example of 
each method is shown in the following illustration: 


Name Operation Operand Comments 

NAME1 OP1 OPERAND1, OPERAND2, OPERAND3, OPERANDG, OPERANDS, OPERANDE » OPERX | 
AND/7, OPERANDS THIS IS ONE WAY 

NAME2 OP2 OPERAND1,OPERAND2, THIS IS ANOTHER WAY 7 X 
OPERAND3, 3 X 
OPERANDS 
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BLDL-—BUILD A DIRECTORY ENTRY LIST (BPAM) 


The BLDL macro is used to complete a list of information from 
the directory of a partitioned data set. The problem program 
must supply a storage area that must include information about 
the number of entries in the list, the length of each entry, and 
the name of each data set member (Cor alias) before the BLDL 
macro is issued. Data set member names in the list must be in 
alphameric order. All read and write operations using the same 
data control block must have been tested for completion before 
the BLDL macro is issued. 


The BLDL macro is written: 


»list address 


——-RX-Type Address, (2-12) or (1) 
The dcb address operand specifies the address of the data 
control block for an open partitioned data set, or zero can 
be specified to indicate that the data set is in a job 
library, step library, or link library. 


—RX-Type Address, (2-12), or (0) 
The list address operand specifies the address of the list 
to be completed when the BLDL macro is issued. The list 
address must be on a halfword boundary. The following : 
illustration shows the format of the list: Sey 


List 0 or 
List Description List More 
Address 5 Field Entry (LL bytes) Entries (FF total) 


Length 
8 3 Itt 


(bytes) 2 2. 0 to 62 


FF: This field must contain a binary value indicating the 
total number of entries in the list. 


LL: This field must contain a binary value indicating the 
length, in bytes, of each entry in the list (must be an 
even number of bytes). If the exact length of the entry is 
known, specify the exact length. Otherwise, specify at 
least 58 bytes (decimal) if the list is to be used with an 
ATTACH, LINK, LOAD, or XCTL macro. The minimum length for 
a list is 12 bytes. 


NAME: This field must contain the member name or alias to 

be located. The name must start in the first byte of the 

name field and be padded to the right with blanks (Cif 

necessary) to fill the 8-byte field. co 
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BLDL 


When the BLDL macro is executed, five fields of the 
directory entry list are filled in by the system. The 
specified length (LL) must be at least 14 to fill in the Z 
and C fields. If the LL field is 12, only the NAME, TT, R, 
and K fields are returned. The five fields are: 


TT: Indicates the relative track number where the 
beginning of the data set member is located. 


R: Indicates the relative block Crecord) number on the 
track indicated by TT. 


K: Indicates the concatenation number of the data set. 
For the first or only data set, this value is zero. 


Z: Indicates where the system found the directory entry: 


Code Meaning 


0 Private library 
l Link library 
2 Job, task, or step library 


3-255 Job, task, or step library of parent task n, where 
n = Z- 


C: Indicates the type (member or alias) for the name, the 
number of note list fields (TTRNs), and the length of the 
user data field Cindicated in halfwords). The following 
describes the meaning of the 8 bits: 


Bit Meaning 
0=0 Indicates a member name. 
0=] Indicates an alias. 


1-2 Indicate the number of TTRN fields (maximum of 3) in 
the user data field. 


3-7 Indicate the total number of halfwords in the user 
data field. If the list entry is to be used with an 
ATTACH, LINK, LOAD, or XCTL macro, the value in bits 
3 through 7 is 22 Cdecimal). 


USER DATA: The user data field contains the user data from 
the directory entry. If the length of the user data field 
in the BLDL list is equal to or greater than the user data 


field of the directory entry, the entire user data field is 


entered into the list. Otherwise, the list contains only 
the user data for which there is space. 
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BLDL 
COMPLETION CODES 


When the system returns control to the problem program, the % } 
low-order byte of register 15 contains a return code; the 
low-order byte of register 0 contains a reason code, as follows: 


Return Reason : 
Code (15) Code (0) Meaning 


00 ¢(X'00') 00 €X"'00') Successful completion. 


0G (X'04') 00 €X'00') One or more entries in the list could 
not be filled; the list supplied may be 
invalid. If a search is attempted but 
the entry is not found, the R field 
(byte 11) for that entry is set to 
zero. 


08 (X'08') 00 €X'00') <A permanent I/O error was detected when 
the system attempted to search the 
directory. 


08 (X'08') 04 (€X'0G') Insufficient virtual storage was 
available. 


08 (€X'08'") 08 (X'08") Invalid DEB. CNot in key 0 through 7.) 
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BSP 


2h RECORD 5AM MAGN APE AND DIRECT ACCES UN 

The BSP macro causes the current volume to be backspaced one 
data block (physical record). All input and output operations 
must be tested for completion before the BSP macro is issued. 
The BSP macro should not be used if the CNTRL, NOTE, or POINT 
macro is being used. The BSP macro can be used only on data 
sets created by BSAM. 


Any attempt to backspace across a file mark will result ina 
return code of X'04' and your tape or direct access volume will 
not be repositioned. This means you cannot issue a successful 
BSP macro after your EODAD routine is entered unless you first 
reposition the tape or direct access volume into your data set. 
are TYPE=T would get you repositioned at the end of your data 
set. 


Magnetic Tape: A backspace is always made toward the beginning 
of the tape. 


Direct Access Device: A BSP macro must not be issued for a data 
set created by using track overflow. 


SYSIN or SYSOUT Data Sets: A BSP macro is ignored, but a 
completion code is returned. 


The BSP macro is written: 





—RX-Type Address, (2-12), or (1) 
The dcb address operand specifies the address of the data 
control block for the volume to be backspaced. The data 
set on the volume to be backspaced must be opened before 
issuing the BSP macro. 
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BSP oo oe | | a 
COMPLETION CODES | | os 7 | | _ 


When the system returns control .to the problem program, the y Y 
low-order byte of register 15 contains a return code; the 
low-order byte of register 0 contains a reason code, as follows: 


Return Reason | 
Code (15) Code (0) Meaning 


00 ¢€X*"00*") 00 (X'00"') Successful completion. 


0G (X'04°) 01 ¢€X'O1') <A backspacing request was ignored on a 
SYSIN or SYSOUT data set. 


0G (X*04') 02 (X'02') occreee not supported for this device 
ype. 


0G (€X'046") 03 €X*03'") Backspace not successful; insufficient 
| virtual storage was available. 


0G (X*04') 04 (X'04') Backspace not successful; permanent I/0 
error. 


0G (X"04") 05 €X*05*) Backspace into load point or beyond 
aie of data set on the current 
volume. 


04 (€X'04*) 06 (X'06') Backspace detected an invalid DEB using 
DEBCHECK. 


0G (€X'04*) 07 (X*07") Backspace detected an invalid extend 
value (M). 


04 (X'04*) 08 (X'08') Backspace issued while I/0 was in 
progress. 
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The BUILD macro is used to construct a buffer pool in an area 
provided by the problem program. The buffer pool may be used by 
more than one data set through separate data control blocks. 
Individual buffers are obtained from the buffer pool using the 
GETBUF macro, and buffers are returned to the buffer pool using 
a FREEBUF macro. See ini j i or an 
explanation of the interaction of the DCB, BUILD, and GETBUF 
macros in each access method, and the buffer size requirements. 


The BUILD macro is written: 





area address—RX-Type Address, (2-12), or (1) 7 
The area address operand specifies the address of the area 
to be used as a buffer pool. The area must start on a 
fullword boundary. 


Pe sec cuane illustration shows the format of the buffer 
pool: 


Area 
Address 


Buffer Pool 
Control 
Block 


8 bytes me utter : 


Length 


Buffer 





si PTCA LUAU TY, see 
Area Length=(Buffer Length) x (Number of Buffers) +8 
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BUILD 


(0) 





—symbol, decimal digit, absexp, or (2-12) 
The number-of-buffers operand specifies the number of 
buffers in the buffer pool to a maximum of 255. 


——-symbol, decimal digit, absexp, or €2-12) 
The buffer length operand specifies the length, in bytes, 
of each buffer in the buffer pool. The value specified for 
the buffer length must be a fullword multiple; otherwise, 
the system rounds the value specified to the next higher 
fullword multiple. The maximum length that can be 
specified is 32760 bytes. For QSAM, the buffer length must 
be at least as large as the value specified in the block 
size (DCBBLKSI) field of the data control block. 


The number of buffers and buffer length can be specified in 
general register 0.-If €0) is coded, register 0 must 
contain the binary values for the number of buffers and 
buffer length as shown in the following illustration. 


Register 0 


| Number of Buffers Buffer Length 





Bits: 
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BUILDRCD 





The BUILDRCD macro causes a butrfer pool and a record area to be 
constructed in a user-provided storage area. This macro is used 
only for variable-length, spanned records processed in QSAM 
locate mode. If the extended logical record interface (XLRI) is 
used to process RECFM=DS or RECFM=DBS records (CISO/ANSI/FIPS 
variable spanned or variable blocked spanned), you can use the 
BUILDRCD macro to build a record area to a maximum length of 
16777183 bytes. Use of this macro before the data set is 
opened, or before the end of the DCB open exit routine, will 
provide a buffer pool that can be used for a logical record 
interface rather than a segment interface for variable-length 
spanned records. To invoke a logical record interface, specify 
BFTEK=A in the DCB. The BUILDRCD macro cannot be specified when 
logical records exceed 32760 bytes. 


The standard form of the BUILDRCD macro is written as follows 
(the list and execute forms are shown following the description 
of the standard form): 


[symbol1]]/ BUILDRCD 





s—A-Type Address or (2-12) 
The area address operand specifies the address of the area 
to be used as a buffer pool. The area must start ona 
fullword boundary. 


—symbol, decimal digit, absexp, or (2-12) 
The number-of-buffers operand specifies the number of 
buffers, to a maximum of 255, to be in the buffer pool. 


——symbol, decimal digit, absexp, or (2-12) 
The buffer-length operand specifies the length, in bytes, 
of each buffer in the buffer pool. The value specified for 
the buffer length must be a fullword multiple; otherwise, 
the system rounds the value specified to the next higher 
fullword multiple. The maximum length that can be 
specified is 32760. 


—A-Type Address or (2-12) 
The record area address operand specifies the address of 
the storage area to be used as a record area. The area 
must start on a doubleword boundary and have a length of 
the maximum logical record (LRECL) plus 32 bytes. 


—-symbol, decimal digit, absexp, or (2-12) 
The record area length operand specifies the length of the 
record area to be used. The area must be as long as the 
maximum length logical record plus 32 bytes for control 
information. If the record area length operand is omitted, 
the problem program must store the record area length in 
the first four bytes of the record area. 
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-BUILDRCD 


16 


The following illustration shows the format of the buffer pool: 


Area 
Address 


BUFAD BUFLG|BUFNO| BUFLTH BUFRECAD 


Address of First Length of Address 
Available Buffer Each of Record Buffer 
Buffer Area 


4 bytes l byte 1 byte 2 bytes 4 bytes Buffer 
12 bytes 


Buffer Pool Control Block Length 
Area Length 


Area Length = (Buffer Length) x (Number of Buffers) +12 










Buffer 


BUFLG Flags: 
Bit Meaning 


0=1 Record area present 
l=1 Buffer control block extended 
2-7 Reserved 


Notes: 


1. The buffer pool control block contains the address of the 
record area and a flag that indicates logical~-record 
interface processing of variable-length, spanned records. 


2. It is the user's responsibility to release the buffer pool 
and the record area after a CLOSE macro has been issued for 


all the data control blocks that use the buffer pool and the 
record area. 
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BUILDRCD 


The list form of the BUILDRCD macro is used to construct a 
program parameter list. The description of the standard form of 
the BUILDRCD macro instruction provides the explanation of the 
function of each operand. The description of the standard form 
also indicates the operands that are totally optional and those 
that are required in at least one of the pair of list and 
execute forms. The format description below indicates the 
optional and required operands in the list form only. 


The list form of the BUILDRCD macro is written: 


[symbol]l]| BUILDRCD 





area address—A-Type Address 

number of buffers—symbol, decimal digit, or absexp 
buffer length—symbol, decimal digit, or absexp 
record area address—A-Type Address 

record area length—~symbol, decimal digit, or absexp 


MF=L 
The MF=L operand specifies that the BUILDRCD macro 
instruction is used to create a parameter list that will be 
referenced by an execute form instruction. 


Note: A parameter list can be constructed by coding only the 
MF=L operand (without the preceding comma); in this case, the 
list is constructed for the area address, number of buffers, 
buffer length, and record area address operands. If the record 
eae se operand is also required, the operands can be coded 
as follows: 


[symbol] BUILDRCD ,,,0,MF=L 
The preceding example shows the coding to construct a list 
containing address constants with a value of 0 in each constant. 


The actual values can then be supplied by the execute form of 
the BUILDRCD macro. 
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BUILDRCD 








A remote parameter list is referred to, and can be modified by, a 


the execute form of the BUILDRCD macro. The description of the eZ 


er 


er 


standard form of the BUILDRCD macro instruction provides the 


explanation of the function of each operand. The description of 
the standard form also indicates the operands that are totally 
optional and those that are required in at least one of the pair 
of list and execute forms. The format description below 
Msi pe the optional and required operands for the execute 

orm only. 


The execute form of the BUILDRCD macro is written: 


BUILDRCD 


»Crecord area length] 
»MF=(E,{list address|(1)}) 





area address—-RX~-Type Address or (2-12) 

number of buffers—absexp 

buffer lenath—absexp 

record area address—RX-Type Address or (2-12) 

record area lenath—absexp 

MFS(E,{list address|(1)}) 
This operand specifies that the execute form of the 
BUILDRCD macro instruction is used, and an existing a 
parameter list (created by a list-form instruction) will be 
used. The MF= operand is coded as described in the 
following: 
E 


list address—-RX-Type Address, (2-12), or (1) 
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The CHECK macro causes the active task to be placed in the wait 
condition, if necessary, until the associated input or output 
operation is completed. The input or output operation is then 
tested for errors and exceptional conditions. If the operation 
is completed successfully, control is returned to the 
instruction following the CHECK macro. If the operation is not 
completed successfully, the error analysis (CSYNAD) routine is 
given control or, if no error analysis routine is provided, the 
task is abnormally terminated. The error analysis routine is 
discussed in the SYNAD operand of the DCB macro. 


aa following conditions are also handled for BPAM and BSAM 
only: 


When Reading: The end-of-data (EOQDAD) routine is given control 
if an input request is made after all the records have been 
retrieved. Volume switching is automatic for a BSAM data set 
that is not opened for UPDAT. For a BSAM data set that is 
opened for update, the end-of-data routine is entered at the end 
of each volume. | 


When Writing: Additional space on the device is obtained when 
the current space is filled and more WRITE macro instructions 
have been issued. 


For BPAM and BSAM, a CHECK macro must be issued for each input 
and output operation, and must be issued in the same order as 
the READ or WRITE macros were issued for the data set. For BDAM 
or BISAM, either a CHECK or a WAIT macro can be used. For 
information on when the WAIT. macro can be used, see Data 


If the ISCII/ASCII. translation routines are included when the 
operating system is generated, translation can be requested by 
coding LABEL=(,AL) or (,AUL) in the DD statement, or it can be 
requested by coding OPTCD=Q in the DCB macro or DCB subparameter 
of the DD statement. If translation is requested, the check 
routine automatically translates BSAM records, as they are read; 
from ISCII/ASCII code to EBCDIC code, provided that the record 
format is F, FB, D, DB, or U. Translation occurs as soon as the 
check routine determines that the input buffer is full. For 
translation to occur correctly, all input data must be in [SCII 
or ASCII code. 


The CHECK macro is written: 


symbol? a 


—RX-Type Address, €2-12), or (1) 
The decb address operand specifies the address of the data 
event control block created by the associated READ or WRITE 
macro or used by the associated input or output operation. 


DSORG={IS|ALL} | | 
The DSORG operand specifies the type of data set 
organization. The following describes the characters that 
can be coded: | 


[Ss 





{»DSORG={IS{ ALL} 1] 


Speci wEse that the program generated is for BISAM use 
only. 


ALL 
Specifies that the program generated is for BDAM, 
BISAM, BPAM, or BSAM use. 


If the DSORG operand is omitted, the program generated is 
for BDAM, BPAM, or BSAM use only. 


Macro Instruction Descriptions 19. 








CHKPT 


CHKPT“—TAKE AF 


ype 
= 
w. 
td 
». 
= 
am 
i 
pe 
ad 
i og 
= 
. 
» 


The CHKPT macro is coded in-line in the problem program. When aes 
this macro executes, the operating system writes a checkpoint ey 
entry in a checkpoint data set. The entry consists of job step 7 
information, such as virtual-storage data areas, data set 
position, and supervisor control, from the problem program. The 
problem program automatically restarts with the instruction 
immediately following the CHKPT macro. 


For details on the CHKPT macro, see Checkpoint/Restart User's 
Guide. 


Mee n= ae 
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The CLOSE macro causes output data set labels to be created and 
volumes to be positioned as specified by the user. The fields 
of the data control block are restored to the condition that 
existed before the OPEN macro was issued, and the data set is 
disconnected from the processing program. Final volume 
positioning or disposition for the current volume can be 
specified to override the positioning implied by the DD control 
statement DISP parameter. Any number of dcb address operands 
and associated options may be specified in the CLOSE macro. 


Associated data sets for an IBM 3525 Card Punch can be closed in 
any sequence, but, if one data set is closed, I/0 operations 
cannot be initiated for any of its associated data sets. 
Additional information about closing associated data sets is 
contained in ini j i ‘ 


After a CLOSE has been issued for several data sets, a return 
code of 4 indicates that at least one of the data sets, VSAM or 
non-VSAM, was not closed successfully. 


A FREEPOOL macro should normally follow a CLOSE macro 
instruction (without TYPE=T) to regain the buffer pool storage 
space and to allow a new buffer pool to be built if the DCB is 
reopened with different record size attributes. 


A special operand, TYPE=T, is provided for processing with BSAM. 
The standard form of the CLOSE macro is written as follows (the 


list and execute forms are shown following the description of 
the standard form): 


 tsymbol] CLOSE (dch_ address, Loption,...1) | | 


dcbh address—A-Type Address or (2-12) 
specifies the address of the data control block for the 
opened data set that is to be closed. 





One of these options indicates the volume positioning that 
1s to occur when the data set is closed. This option is 
generally used with the TYPE=T operand or for data sets on 
magnetic tape. However, options specified in the CLOSE 
macro will override disposition specifications in the JCL 
for all data sets. The options are: 


REREAD 
specifies that the current volume is to be positioned 
to reprocess the data set. If processing was forward, 
the volume is positioned to the beginning of the data 
set; if processing was backward CRDBACK), the volume 
is positioned to the end of the data set. 
FREE=CLOSE is specified in the JCL, the data set is 
not unallocated until the end of the job step. 


LEAVE . 
specifies that the current volume is to be positioned 
to the logical end of the data set. If processing was 
forward, the volume is positioned to the end of the 
data sat; if processing was backward CRDBACK), the 
volume is positioned to the beginning of the data set. 


REWIND 
specifies that the current magnetic tape volume is to 
be positioned at the load point, regardless of the 
direction of processing. REWIND cannot be specified 
when TYPE=T is specified. If FREE=CLOSE has been 
coded on the DD statement associated with the data set 
being closed, coding the REWIND option will result in 
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the data set being freed at the time it is closed 
rather than at the termination of the job step. 


FREE | 3 
specifies that the current data set is to be freed at 
the time the data set is closed, rather than at the 
time the job step is terminated. For tape data sets, 
this means that the volume is eligible for use by 
other tasks or to be demounted. Direct access volumes 
may also be freed for use by other tasks. They may be 
freed for demounting if (1) no other data sets on the 
volume are open and (2) the volume is otherwise 
demountable. Do not use this option with CLOSE 
TYPE=T. (For other restrictions on the FRE 
parameter, see JCL.) | ) 


DISP : 

specifies that a tape volume is to be disposed of in 
the manner implied by the DD statement associated with 
the data set. Direct access volume positioning and 
disposition are not affected by this parameter. There 
are several dispositions that can be specified in the 
DISP parameter of the DD statement; DISP can be PASS, 
DELETE, KEEP, CATLG, or UNCATLG. 


Depending on how the DISP option is coded in the DD 
statement, the current magnetic tape volume will be 
positioned as follows: 


DISP Parameter Action | 

PASS Forward space to the end of 
data set on the curren 
volume. | 

DELETE Rewind the current volume. 


KEEP, CATLG, or UNCATLG The volume is positioned as 
for CLOSE REREAD. Note that 
the volume is not rewound and 
unloaded. 


If FREE=CLOSE has been coded in the DD statement 
associated with this data set, coding the DISP option 
in the CLOSE macro will result in the data set being 
freed when the data set is closed, rather than at the 
time the job step is terminated. 


Note: When the option operand is omitted, DISP is assumed. 
For TYPE=T, this is processed as LEAVE during execution. 


The LEAVE and REREAD options are meaningless except for 
magnetic tape and CLOSE TYPE=T. 


TYPE=T 

You can code CLOSE TYPE=T to perform some close functions 
for sequential data sets on magnetic tape and direct access 
volumes processed with BSAM. When you use TYPE=T, the DCB 
used to process the data set maintains its open status, and 
you should not:issue another OPEN macro to continue 
processing the same data set. This option cannot be used 
in a SYNAD exit routine. , 


The TYPE=T operand causes the system control program to 
process labels, modify some of the fields in the system 
control blocks for that data set, and reposition the volume 
Cor current volume in the case of multivolume data sets) in 
much the same way that the normal CLOSE macro does. When 
you code TYPE=T, you can specify that the volume either be 
positioned at the end of data (the LEAVE option) or be 
repositioned at the beginning of data (the REREAD option). 
Magnetic tape volumes are repositioned either immediately 
before the first data record or immediately after the last 
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data record; the presence of tape labels has no effect on 
repositioning. 


If you code the RLSE keyword with the SPACE parameter on 
the DD statement that describes the output data set, it is 
ignored by temporary close (CLOSE TYPE=T). If the last 
operation occurring prior to the normal CLOSE Cwithout 
TYPE=T) and after the temporary close was a write, then any 
unused space will be released. 


Note: To use the CLOSE macro instruction supplied in the 
MVS/7XA macro library on MVS/370, use the SPLEVEL macro 
instruction. You must use the SPLEVEL macro instruction to 
ensure that the MVS/XA version of the CLOSE macro 
instruction executes successfully on MVS/370. For more 
information on how to use the ie macro, see 

ilities, Volume 2. 


For additional information and coding restrictions, see 
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The list form of the CLOSE macro is used to construct a data 
management parameter list. Any number of operands (data control 
block addresses and associated options) can be specified. 


The list consists of a one-word entry for each DCB in the 
parameter list; the high-order byte is used for the options and 
the three low-order bytes are used for the DCB address. The end 
of the list is indicated by a l1 in the high-order bit of the 
last entry's option byte. The length of a list generated by a 
list-form instruction must be equal to the maximum length 
required by an execute-form instruction that refers to the same 
Spraeer A maximum length list can be constructed by one of two 
methods: 


e Code a list-form instruction with the maximum number of 
parameters that are required by an execute-form instruction 
that refers to the list. 


@ Code a maximum length list by using commas in a list-~form 
instruction to acquire a list of the appropriate size. For 
example,, coding CLOSE (,,,,,,,,,),MF=L would provide a list 
of five fullwords (five dcb addresses and five options). 


Entries at the end of the list that are not referenced by the 
execute-form instruction are assumed to have been filled in when 
the list was constructed or by a previous execute-form 
instruction. Before using the execute-form instruction, you may 
shorten the list by placing a 1 in the high-order bit of the 
last DCB entry to be processed. 


A zeroed work area on a word boundary is equivalent to CLOSE 
(,DISP,...}3,MF=L and can be used in place of a list-form 
instruction. The high-order bit of the last DCB entry must 
contain a l before this list can be used with the execute-form 
instruction. 


A parameter list constructed by a CLOSE macro, list form, can be 
referred to by either an OPEN or CLOSE execute-form instruction. 


The description of the standard form of the CLOSE macro provides 
the explanation of the function of each operand. The 
description of the standard form also indicates the operands 
that are completely optional and those required in at least one 
of the pair of list and execute forms. The format description 
eons ae ose the optional and required operands in the list 
orm only. 


The list form of the CLOSE macro is written: 


[symbol1] CLOSE ([dcb address1,foption],...) 
[> TYPE=T] 
»MF=L 





deb address—A-Type Address 
option—Same as standard form 


TYPE=T . 
The TYPE=T operand can be coded in the list-form 
instruction to allow the specified option to be checked for 
validity when the program is assembled. 


MF=L 
The MF=L operand specifies that the CLOSE macro instruction 
is used to create a data management parameter list that 
will be referred to by an execute-form instruction. 
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A list form of the CLOSE macro is used in and can be modified by 
the execute form of the CLOSE macro. The parameter list can be 
generated by the list form of either an OPEN macro or a CLOSE 
macro. 


The description of the standard form of the CLOSE macro provides 
the explanation of the function of each operand. The 
description of the standard form also indicates the operands 
that are totally optional and those required in at least one of 
the pair of list and execute forms. The format description 
below indicates the optional and required operands in the 
execute form only. 


The execute form of the CLOSE macro is written: 


[symbol1]] CLOSE [(&dcb address],l[option],...)] 
{[,TYPE=T] 
»MF=(E,faddress of list form! (1)}) 





dch address—RX-Type Address or (2-12) 


—If specified, same as the standard form. If not 
specified, the option specified in the list form of the CLOSE 
macro will be used. 


TYPE=T—Same as standard form. 


MF=(E,faddress of the list form|(1)}) 
specifies that the execute form of the CLOSE macro 
instruction is being used, and the parameter list is 
created by the list form of the CLOSE macro instruction. 
The MF= operand is coded as described in the following: 


address of the list form of the CLOSE Cor OPEN) macro 
instruction——RX-Type Address, (2-12), or (1) 
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The CNTRL macro is used to control magnetic tape drives (CBSAM 
only for a data set that is not open for output), on-line card 
readers, IBM 3525 Card Punches Cread and print features), 
printers (CBSAM and QSAM), and the IBM 3890 Document Processor 
CQSAM only). For information on additional operands for the 
CNTRL macro for the 3890, see. 


The MACRF operand of the DCB macro must specify a C. The CNTRL 
macro is ignored for SYSIN or SYSOUT data sets. For BSAM, all 
input and output operations must be tested for completion before 
blag eg macro is issued. The control facilities available are 
as follows: 


Card Reader: Provides stacker selection, as follows: 


QSAM—For unblocked records, a CNTRL macro should be issued 
after every input request. For blocked records, a CNTRL macro 
is issued after the last logical record on each card that is 
retrieved. Whether reading blocked or unblocked records, do not 
issue a CNTRL macro after a GET macro has caused control to pass 
to the EODAD routine. The move mode of the GET macro must be 
used, and the number of buffers (CBUFNO field of the DCB) must be 
1. If a CLOSE macro is issued before the last card is read, the 
operator should clear the reader before the device is used 
again. 


BSAM—The CNTRL macro should be issued after every input 
request. 


Printer: Provides line spacing or a skip to a specific carriage 
control channel. A CNTRL macro cannot be used if carriage 
control characters are provided in the record. If the printer 
contains the universal character set feature, data checks should 
7 a COPTCD=U should not appear in the data control 

ock). 


Magnetic Tape: Provides method of forward spacing and 
backspacing (CBSAM only for a data set that is not open for 
output). If OPTCD=H is indicated in the data control block, the 
CNTRL macro can be used to perform record positioning on DOS 
tapes that contain embedded checkpoint records. Embedded 
checkpoint records encountered during the record positioning are 
bypassed and are not counted as blocks spaced over. OPTCD=H 
must be specified in a job control language DD statement. The 
CNTRL macro cannot be used to backspace DOS 7-track tapes that 
are written in data convert mode that contain embedded 
checkpoint records CBSAM). 


Note: The CNTRL macro should not be used with output operations 
on BSAM tape data sets. 


3525 Printing: Provides line spacing or a skip to a specific 
printing line on the card. The card contains 25 printing lines; 
the odd-numbered lines 1 through 23 correspond to the printer 
skip channels 1 through 12 (see the SK operand). For additional 
information about 3525 printing operations, see QS and 0S/V5 


Programming puppoa 0 ne i ' ard Keade ana 5 IY 
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The CNTRL macro is written: 


[symbol]| CNTRL 


} 
- 111) 123} 


{,BSRE,number of blocks]} 
{,FSR£,number of blocks]} 





The dcb address operand specifies the address of the data 
control block for the data set opened for the on-line 
device. 


$s,{1[2} 
The SS operand is coded as shown to indicate that the 
control function requested is stacker selection on a card 
reader; either 1 or 2 must be coded to indicate which 
stacker is to be selected. 


SP,f11213} 
The SP operand is coded as shown to indicate that the 
control function requested is printer line spacing or 3525 
card punch line spacing; either 1, 2, or 3 must be coded to 
indicate the number of spaces for each print line. 


he SK operand is coded as shown to indicate that the 
control function requested is a skip operation on the 
printer or 3525 card punch, print feature; a number (] 
through 12) must be coded to indicate the channel or print 
line to which the skip is to be taken. 


BSM : 
The BSM operand indicates that the control function 
requested is to backspace the magnetic tape past a 
tapemark, then forward space over the tapemark. When this 
operand is specified, the DCBBLKCT field in the data 
control block is set to zero. 


FSM 
The FSM operand indicates that the control function 
requested is to forward space the magnetic tape over a 
tapemark, then backspace past the tapemark. When this 
operand is specified, the DCBBLKCT field in the data 
control block is set to zero. . 


BSR a 
The BSR operand indicates that the control function 
requested is to backspace the magnetic tape the number of 
blocks indicated in the number-of-blocks operand. — 


FSR | 
The FSR operand indicates that the control function 
requested is to forward space the magnetic tape the number 
of blocks indicated in the number-of-blocks operand. 


—-symbol, decimal digit, absexp, or (2-12) 
The number-of-blocks operand specifies the number of 
blocks to backspace (see BSR operand) or forward space 
(see FSR operand) the magnetic tape. The maximum 
value that can be specified is 32767. If the | 
number-of-blocks operand is omitted, 1 is assumed. 
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If the forward space or backspace operation is not completed 
successfully, control is passed to the error analysis (SYNAD) 
routine; if no SYNAD exit routine is designated, the task is 
abnormally terminated. Register contents, when control is 
passed to the error analysis routine, are shown in 

Appendix A, “Status Information Following an Input/Output 
Operation" on page 190. If a tapemark is encountered for BSR or 
FSR, control is returned to the processing program, and register 
15 contains a count of the uncompleted forward spaces or 
backspaces. If the operation is completed normally, register 15 
contains the value zero. 
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DCB-—CONSTRUCT A DATA CONTROL BLOCK (BDAM) 


The data control block for a basic direct access method (BDAM) 
data set is constructed during assembly of the problem program. 
The DSORG and MACRF operands must be coded in the DCB macro 
instruction, but the other operands can be supplied from the DD 
statement or an existing data set label (DSCB). If more than 
one of these sources specifies information for a particular 
field, the order of priority is the DCB macro instruction, DD 
statement, and data set label. Each of the BDAM DCB operand 
descriptions contains a heading, "Source." The information 
under this heading describes the sources from which an operand 
can be supplied to the data control block 


The DCB macro for BDAM is written: 
| Csvmbol1|DCB| LBFALN={F 1D} 
[»>BFTEK=R] 
[ ,BLKSIZE=absexp] 


, DSORG= (DA| DAU} 
[,EXLST= 


relexp] 
2 KEYLEN= absexp] 


CKILTIPKLCIIIIFLCI DF 


1 This parameter must be supplied before an OPEN macro is 
sneer i for this DCB; it cannot be supplied in the open exit 
routine. 


The following describes the DCB operands that can be specified 
for creating and processing a BDAM.data set: 


BFALN={F | D} 


The BFALN operand specifies the boundary alignment for each 


buffer in the buffer pool. The BFALN operand can be 


specified when (1) BSAM is being used to create a BDAM data 


set and buffers are acquired automatically, (€2) when an 
existing BDAM data set is being processed and dynamic 
buffering is requested, or (3) when the GETPOOL macro 
instruction is used to construct the buffer pool. If the 
BFALN operand is omitted, the system provides doubleword 
alignment for each buffer. The following describes the 
characters that can be specified: 


F 
specifies that each buffer is aligned on a fullword 
boundary that is not also a doubleword boundary. 


specifies that each buffer is aligned on a doubleword 
boundary. 


If the BUILD macro instruction is used to construct the 
buffer pool or if the problem program controls all 
buffering, the problem program must provide the area for 
the buffers and control buffer alignment. 


Source: The BFALN operand can be supplied in the DCB macro 
instruction, in the DCB subparameter of a DD statement, or 
by the problem program before completion of the data 
control block exit routine. If both the BFALN and BFTEK 


operands are specified, they must be supplied from the same 


source. 
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BFTEK=R 
The R value coded for the BFTEK sparaua specifies that the | —_ 
data set is being created for or contains variable-length . 
spanned records. The BFTEK operand can be coded only when ae 
the record format is specified as RECFN= vs. 


When variable- length enanned Kétonde are wet Eten the data 
length can exceed the total capacity of a single track.on 
the direct access device being used, or it can exceed the 
remaining capacity ona given track. The system divides 
the data block into segments Cif necessary), writes the 
first segment ona track, and writes the remaining 
segment(s) on the following track(s). 


When a variable-length spanned record is read, the system 
reads each segment and assembles a complete data block in 
the buffer designated in the area address: operand of a READ 
macro instruction. | | 


Note: ‘Veraables length spanned records can also be read 
using BSAM.. When BSAM is used to read a BDAM 
variable-length spanned record, the record is read one 
segment at a time, and the problem program must assemble 
the segments into a complete data block. This operation is 
described in the section for the or DCB ‘macro 
instruction. 


Source: The BFTEK operand can be guseiied in the DCB macro 
instruction, in the DCB subparameter of a DD statement, or 
by the problem program before completion of the data 
control block exit routine. If both the BFTEK and BFALN 
operands are Bpece tree) they must be supplied from the same 
source. i 


BLKSIZE=absexp (maximum calue is 32760) a | 
The BLKSIZE operand specifies the length, in bytes, of each 
data block for fixed-length records, or it specifies the CG 
maximum length, in bytes, of each data block for ee 
variable-length or undefined-length records. If keys are 
used, the length of the key is not included in the value 
specified for the BLKSIZE operand. 


The actual value that can be specified in the BLKSIZE 
operand depends on the record format and the type of direct 
access device being used. If track overflow is used or if 
variable-length spanned records are used, the value 
specified in the BLKSIZE operand can be up to the maximum. 
For all other record formats (CF, V, VBS, and U), the 
maximum value that can be specified in the BLKSIZE operand 
is determined by the track capacity of a single track on 
the direct access device being used. Device capacity for 
direct access devices is described in Appendix C, "Device 
Capacities" on page 203 of this publication. For 
additional information about device capacity and space 
allocation, see ; | 


Source: The BLKSIZE operand can be supplied in the DCB 
macro instruction, in the DCB subparameter of a DD 
statement, by the problem program before completion of the 
data control block exit routine, or by the data set label 
of an existing data set. 


BUFCB=relexp 

The BUFCB operand specifies the address of the buffer pool 
control block when the buffer pool is constructed by a 
BUILD macro instruction. 


If the buffer pool is constructed automatically, | 
dynamically, or by a GETPOOL macro instruction, the system 
places the address of the buffer pool control block into 
the data control block, and the BUFCB operand is not 
required. The BUFCB operand is not required if the problem 
program controls all buffering. 
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Source: The BUFCB operand can be supplied in the DCB macro 
instruction or by the problem program before completion of 
the data control block exit routine. 


BUFL=absexp (maximum value KEYLEN + BLKSIZE is 32760) 


The BUFL operand specifies the length, in bytes, of each 
buffer in the buffer pool when the buffers are acquired 
automatically (create BDAM) or dynamically Cexisting BDAM). 


When buffers are acquired automatically (create BDAM), the 
BUFL operand is optional; if specified, the value must be 
at least as large as the sum of the values specified for 
the KEYLEN and BLKSIZE operands. If the BUFL operand is 
omitted, the system constructs buffers with a length equal 
to the sum of the values specified in the KEYLEN and 
BLKSIZE operands. 


The BUFL operand must be specified when an existing BDAM 
data set is being processed and dynamic buffering is 
requested. Its value must be at least as large as the 
value specified for the BLKSIZE operand when the READ or 
WRITE macro instruction specifies a key address, or the 
value specified in the BUFL operand must be at least as 
large as the sum of the values specified in the KEYLEN and 
BLKSIZE operands if the READ and WRITE macro instructions 
specify 'S' for the key address. 


The BUFL operand can be omitted if the buffer pool is 
constructed by a BUILD or GETPOOL macro instruction or if 
the problem program controls all buffering. 


Source: The BUFL operand can be supplied in the DCB macro 
instruction, in the DCB subparameter of a DD statement, or 
by the problem program before completion of the data 
control block exit routine. | 


BUFNO=absexp (maximum value is 255) 


The BUFNO operand specifies the number of buffers to be 
constructed by a BUILD macro instruction, or it specifies 
the number of buffers and/or segment work areas to be 
acquired by the system. 


If the buffer pool is constructed by a BUILD macro 
instruction or if buffers are acquired automatically when 
BSAM is used to create a BDAM data set, the number of 
buffers must be specified in the BUFNO operand. 


If dynamic buffering is requested when an existing BDAM 
data set is being processed, the BUFNO operand is optional; 
if omitted, the system acquires two buffers. 


If variable-length spanned records are being processed and 
dynamic buffering is requested, the system also acquires a 
segment work area for each buffer. If dynamic buffering is 
not requested, the system acquires the number of segment 
work areas specified in the BUFNO operand. If the BUFNO 
operand is omitted when variable-length spanned records are 
being processed and dynamic buffering 1s not requested, the 
system acquires two segment work areas. 


If the buffer pool is constructed by a GETPOOL macro 
instruction or if the problem program controls all 
buffering, the BUFNO operand can be omitted, unless it is 
required to acquire additional segment work areas for 
variable-length spanned records. 


Source: The BUFNO operand can be supplied in the DCB macro 
instruction, in the DCB subparameter of a DD statement, or 
by the problem program before completion of the data 
control block exit routine. 
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DDNAME=symbol 
The DDNAME operand specifies the name used to identify the oo. 
job control language data definition (DD) statement that — 
defines the data set being created or processed. a 


Source: The DDNAME operand can be supplied in the DCB macro 
instruction or can be moved into the DCB by the problem 
program before an OPEN macro instruction is issued to open 
the data set. 


DSORG={DA]| DAU} 
The DSORG operand specifies the data set organization and 
whether the data set contains any location-dependent 
information that would make it unmovable. For example, if 
actual device addresses are used to process a BDAM data 
set, the data set may be unmovable. The following 
describes the characters that can be specified: 


DA 
specifies a direct organization data set. 


DAU 
specifies a direct organization data set that contains 
location-dependent information. 


When a BDAM data set is created, the basic sequential 
access method (BSAM) is used. The DSORG operand in the DCB 
macro instruction must be coded as DSORG=PS or PSU when the 
data set is created, and the DCB subparameter in the 
corresponding DD statement must be coded as DSORG=DA or 
DAU. This creates a data set with a data set label 
identifying it as a BDAM data set. 


Source: The DSORG operand must be specified in the DCB 
macro instruction. See the preceding comment about 
creating a BDAM data set. 


EXLST=relexp _ 

The EXLST operand specifies the address of the problem 
program exit list. The EXLST operand must be specified if 
the problem program processes user labels during the open 
or close routine, if the data control block exit routine is 
used for additional processing, or if the DCB abend exit is 
used for abend condition analysis. 


For the format and requirements of exit list processing, 
see Appendix D, "DCB Exit List Format and Contents" on 
page 206. For additional information about exit list 
processing, see Data Administration Guide. 


Source: The EXLST operand can be supplied in the DCB macro 
eee etal or by the problem program before the exit is 
needed. 


KEYLEN=absexp (maximum value is 255) 
The KEYLEN operand specifies the length, in bytes, of all 
keys used in the data set. When keys are used, a Key is 
associated with each data block in the data set. If the 
key length is not supplied by any source, no input or 
output requests that require a key can be specified ina 
READ or WRITE macro instruction. 


Source: The KEYLEN operand can be supplied in the DCB 
macro instruction, in the DCB subparameter of a DD 
statement, by the problem program before the completion of 
the data control block exit routine, or by an existing data 
set label. If KEYLEN=0 is specified in the DCB macro 
instruction, a special indicator is set in RECFM so that 
KEYLEN cannot be supplied from the DCB subparameter of a DD 
statement or data set label of an existing data set. 
KEYLEN=0 can be coded only in the DCB macro instruction and 
will be ignored if specified in the DD statement. 
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LIMCT=absexp 
ge » The LIMCT operand specifies the number of blocks or tracks 
( to be searched when the extended search option (OPTCD=E) is 
requested. 


When the extended search option is requested and relative 
block addressing is used, the records must be fixed-length 
record format. The system converts the number of blocks 
specified in the LIMCT operand into the number of tracks 
required to contain the blocks, then proceeds in the manner 
described below for relative track addressing. 


When the extended search option is requested and relative 
track addressing is used (Cor the number of blocks has been 
converted to the number of tracks), the system searches for 
two things: (a) the block specified in a READ or WRITE 
macro instruction (type DK), or (b) available space where 
it can adda block CWRITE macro instruction, type DA). The 
search is as follows: 


1. The search begins at the track specified by the block 
address operand of a READ or WRITE macro instruction. 


2. The search continues until the search is satisfied, the 
number of tracks specified in the LIMCT operand have 
been searched, or the entire data set has been 
searched. If the search has not been satisfied when 
the last track of the data set is reached, the system 
continues the search by starting at the first track of 
the data set if the EOF marker is on the last track 
that was allocated to the data set. (This operation 
allows the number specified in the LIMCT operand to 
exceed the size of the data set, causing the entire 
data set to be searched.) You can ensure that the EOF 
marker is on the last allocated track by determining 

ee the size of the data set and allocating space in 
( blocks, or by allocating space in tracks and including 
the RLSE parameter on the SPACE operand of the DD 
statement CRLSE specifies that all unused tracks be 
returned to the system). 


The problem program can change the DCBLIMCT field in the 
data control block at any time, but, if the extended search 
option is used, the DCBLIMCT field must not be zero when a 
READ or WRITE macro instruction is issued. 


If the extended search option is not requested, the system 
ignores the LIMCT operand, and the search for a data block 
is limited to a single track. 


Source: The LIMCT operand can be supplied in the DCB macro 
instruction, the DCB subparameter of a DD statement, or by 

the problem program before the count is required by a READ 

or WRITE macro instruction. 


MACRF={{CRCKITI[ IF CXICLSI£LCI)} 

CCWLALKICTI( KCI {I} (C1 )} 

CORCKLC III IF CXICSILC] WLALKICLIJ | KCI] {I}£C1)}} 
The MACRF operand specifies the type of macro instructions 
CREAD, WRITE, CHECK, and WAIT) used when the data set is 
processed. The MACRF operand also specifies the type of 
search argument and BDAM functions used with the data set. 
When BSAM is used to create a BDAM data set, the BSAM 
operand MACRF=WL is specified. This special operand 
invokes the BSAM routine that can create a BDAM data set. 
The following describes the characters that can be 
specified for BDAM: 


A 
a that data blocks are to be added to the data 
set. 
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specifies that CHECK macro instructions are used to —_ 
test for completion of read and write operations. If u | 
C is not specified, WAIT macro instructions must be ed 
used to test for completion of read and write 

operations. 





specifies that the search argument is to be the block 
identification portion of the data block. If relative 
addressing is used, the system converts the relative 
erecta to a full device address (MBBCCHHR) before the 
search. 3 


specifies that the search argument is to be the key 
portion of the data block. The location of the key to 
be used as a search argument is specified in a READ or 
WRITE macro instruction. 


specifies that READ macro instructions are to be used. 
READ macro instructions can be issued when the data 
set is opened for INPUT, OUTPUT, or UPDAT. 


specifies that dynamic buffering is requested by 
specifying 'S' in the area address operand of a READ 
or WRITE macro instruction. 


specifies that WRITE macro instructions are used. 
WRITE macro instructions can be issued only when the 
data set is opened for OUTPUT or UPDAT. 


specifies that READ macro instructions request | 
exclusive control of a data block. When exclusive Nee ae? 
control is requested, the data block must be released 

by a subsequent WRITE or RELEX macro instruction. 


Source: The MACRF operand must be supplied in the DCB 
macro instruction. 


OPTCD={CRIAICE]ILFICWI]} 
The OPTCD operand specifies the optional services that are 
to be used with the BDAM data set. These options are 
related to the type of addressing used, the extended search 
option, block position feedback, and write-validity 
checking. The following describes the characters that can 
be specified (the characters can be specified in any order, 
and no commas are allowed between characters): 


A 
specifies that actual device addresses (MBBCCHHR) are 
provided to the system when READ or WRITE macro 
instructions are issued. 


specifies that the extended search option is used to 
locate data blocks or available space where a data 
block can be added. When the extended search option 
is specified, the number of blocks or tracks to be 
searched must be specified in the LIMCT operand. The 
extended search option is ignored if actual addressing 
(OPTCD=A) is also specified. The extended search 
option requires that the data set have keys and that 
the search be made by key (by specifying DK in the 
READ or WRITE macro or DA in the WRITE macro). 





specifies that block position feedback requested by a 
READ or WRITE macro instruction is to be in the same 
form that was originally presented to the system in 
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the READ or WRITE macro instruction. If the F operand 
pe. is omitted, the system provides feedback, when 
( requested, in the form of an 8-byte actual device 
address. (Feedback is always provided if exclusive 
control is requested. ) 


R . 
specifies that relative block addresses Cin the form 
of 3-byte binary numbers) are provided to the system 
when a READ or WRITE macro instruction is issued. 

W 


specifies that the system is to perform a validity 
check for each record written. 


Note: Relative track addressing can only be specified by 
omitting both A and R from the OPTCD operand. If you want 
to specify relative track addressing after your data set 
has been accessed uSing another addressing scheme COPTCD=A 
or RJ), you should either specify a valid OPTCD operand (E> 
F, or W) in the DCB macro or DD card when you reopen your 
data set, or zero out the OPTCD=A or R bits in the data 
control block exit routine. Note that the first method 
will prevent the open routines from merging any of the 
other OPTCD bits from the format-1 DSCB in the DCB. Both 
methods will update the OPTCD in the DSCB if the open is 
for OUTPUT, OUTIN, or UPDAT. 


Source: The OPTCD operand can be supplied in the DCB macro 
instruction, in the DCB subparameter of a DD statement, or 
by the problem program before completion of the DCB open 
exit routine. 


RECFM={UIVIS|BS]]FIT]} 
The RECFM operand specifies the format and characteristics 
fies. of the records in the data set. The following describes 
( the characters that can be coded (if the optional 
elie ata are coded, they must be coded in the order shown 
above): 


B 
specifies that the data set contains blocked records. 
The record format RECFM=VBS is the only combination in 
which B can be specified. RECFM=VBS does not cause 
the system to process spanned records; the problem 
program must block and segment the records. RECFM=VBS 
is treated as a variable- length record by BDAM. 


specifies that the data set contains fixed-length 
records. 


specifies that the data set contains variable-length 
spanned records when it 1s coded as RECFM=VS. When 
RECFM=VBS is coded, the records are treated as 
variable-length records, and the problem program must 
block and segment the records. 


specifies that track overflow is to be used with the 
data set. Track overflow allows a record to be 
partially written on one track and the remainder is 
written on the following track Cif required). 


specifies that the data set contains undefined-length 
records. 


specifies that the data set contains variable-length 
records. 
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Source: The RECFM operand can ke supplied in the DCB macro 
instruction, in the DCB subparameter of a DD statement, the 
problem program before completion of the data control block 
rae routine, or by the data set label of an existing data 
set, 


SYNAD=relexp | 
The SYNAD operand specifies the address of the error 
analysis routine to be given control when an uncorrectable 
input/output error occurs. The contents of the registers 
when the error analysis routine is given control are 
described in Appendix A, "Status Information Following an 
Input/Output Operation®™ on page 190. 





The error analysis routine must not use the save area 
pointed to by register 13, because this area is used by the 
system. The system does not restore registers when it 
regains control from the error analysis routine. The error 
analysis routine can issue a RETURN macro instruction that 
uses the address in register 14 to return control to the 
system. When control is returned in this manner, the 
system returns control to the problem program and proceeds 
as though no error had been encountered. When a BDAM data 
set 1s being created, a return from the error analysis 
Aceh to the system causes abnormal termination of the 
ask. 


If the SYNAD operand is omitted, the task is abnormally 
terminated when an uncorrectable input/output error occurs. 


Source: The SYNAD operand can be supplied in the DCB macro 
instruction or by the problem program. The problem program 
can also change the error routine address at any time. 
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The data control block for the basic indexed sequential access 
method (BISAM) is constructed during assembly of the problem 
program. The DSORG and MACRF operands must be ceded in the DCB 
macro instruction, but the other DCB operands can be supplied 
from other sources. Each BISAM DCB operand description contains 
a heading, “Source.™" The information under this heading 
describes the sources of the operand that can be supplied to the 
data control block 


The DCB macro for BISAM is written: 


[BFALN={F|D}] 

[,»BUFCB=relexp] 

[,BUFL=absexp] 

[»BUFNO=absexp] 

[ »DDNAME=symbol ]} 

» DSORG=IS 

[,EXLST=relexp]. 

»MACRF={CCRISI[C] )} 
C(WLULA] A} IC]) 
eee 

[»>MSHI=relexp] 


[»,NCP=absexp] 
»OPTCD={CLLICRIE WI) )} 
[,SMSI=absexp] 
[,SMSW=absexp] 

[> SYNAD= relexp] 


} 
WLULAI|A}IC1)}} 





1 This parameter must be supplied before an OPEN macro is 
meter for this DCB; it cannot be supplied in the open exit 
routine. 


The following describes the DCB operands that can be supplied 
when the basic indexed sequential access method is used 


BFALN={FID} 
The BFALN operand specifies the boundary alignment for each 
buffer in the buffer pool when the buffer pool is acquired 
for use with dynamic buffering or when the buffer pool is 
constructed by a GETPOOL macro instruction. If the BFALN 
operand is omitted, the system provides doubleword 
alignment for each buffer. The following describes the 
characters that can be specified: 


F , 
specifies that each buffer is on a fullword boundary 
that is not also a doubleword boundary. 


specifies that each buffer is on a doubleword 
boundary. 


If the BUILD macro instruction is used to construct the 
buffer pool, or the problem program controls all buffering, 
the problem program must provide an area for the buffers 
and control buffer alignment. : 


source: The BFALN operand can be supplied in the DCB macre 
instruction, in the DCB subparameter of a DD statement, or 
by the problem program before completion of the data 
control block exit routine. 


BUFCB=relexp 

The BUFCB operand specifies the address of the buffer pool 
control block when the buffer pool is constructed by a 
BUILD macro instruction. 


If dynamic buffering 1s requested or the buffer pool is 
constructed by a GETPOOL macre instruction, the system 
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places the address of the buffer pool control block into 
the data control block, and the BUFCB operand must be 
omitted. The BUFCB operand must be omitted if the problem 
program controls all buffering. * 


Source: The BUFCB operand can be cuppiied in the DCB macro 
instruction or by the problem program before completion of 
the data control block exit routine. | 


BUFL=absexp (maximum value is 32760) 

The BUFL operand specifies the length of each buffer 66 be 
constructed by a BUILD or GETPOOL macro instruction. When 
the data set is opened, the system computes the minimum 
length required and verifies that the length in the buffer 
pool control block is equal to or greater than the minimum 
required. The system then inserts the computed mengen into 
the BUFL field of the data control block. 


If dynamic buffering is requested, the system computes the 
buffer nah required, and the BUFL operand is not 
require | 


If the problem program controls all buffering, the BUFL 
operand is not required. However, an ISAM data set 
requires additional buffer space for system use. For a 
description of the buffer length. required for various ISAM 
operations, see ; 


Source: The BUFL operand can be supplied in the DCB macro 
instruction, in the DCB subparameter of a DD statement, or 
by the problem program before completion of the data 
control block exit routine. 


BUFNO=absexp (maximum value is 255) 
The BUFNO operand specifies the number of buffers requested 
for use with dynamic buffering, or it specifies the number 
of buffers to be constructed by a BUILD macro instruction. 
If dynamic buffering is requested but the BUFNO operand is 
omitted, the system automatically acquires two buffers for 
use with dynamic buffering. 


If the GETPOOL macro instruction is used to construct the 
buffer pool, the BUFNO operand is not required. 


Source: The BUFNO operand can be supplied in the DCB macro 
instruction, in the DCB subparameter of a DD statement, or 
by the problem program before completion of the data 
control block exit routine. 


DDNAME= 
The DDNAME operand specifies the name used to identify the 
job control language data definition statement that defines 
the ISAM data set to be processed. 


Source: The DDNAME operand can be supplied in the DCB 
macro instruction or by the problem program before an OPEN 
macro instruction is issued to open the data set. 


DSORG=IS 
The DSORG operand specifies the indexed sequential 
organization of the data set. IS is the only combination 
of characters that can be coded for BISAM. 


Source: Unless it is for a data set passed from a previous 
job step, the DSORG operand must be coded in the DCB macro 
instruction and in the DCB subparameter of a DD statement. 
In this case, DSORG may be omitted from the DD statement. 


EXLST=relexp 

The EXLST operand specifies the address of the problem 
program exit list. If the problem program uses the data 
control block exit routine for additional processing, the 
EXLST operand is required. © 
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For the format and requirements for exit list processing, 
‘aa see Appendix D, "DCB Exit List Format and Contents™ on 
( | page 206. For additional information about exit list 
processing, see ini j j : 


Source: The EXLST operand can be supplied in the DCB macro 
instruction or by the problem program before the associated 
exit is required. 


MACRF={{(RISI1[C] }} 

CC(WLULA] |A} IC] )} 

CCRLULS] |SII[C],WLULA] [|A} [C1 )}} 
The MACRF operand specifies the type of macro instructions 
CREAD, WRITE, CHECK, WAIT, and FREEDBUF) and type of 
processing (add records, dynamic buffering, and update 
records) to be used with the data set being processed. The 
operand can be coded in any of the combinations shown 
above; the following describes the characters that can be 
coded: 


A 
specifies that new records are to be added to the data 
set. This character must be coded if WRITE KN macro 
instructions are used with the data set. 


Cc 
specifies that the CHECK macro instruction is used to 
test I/0 operations for completion. If C is not 
coded, WAIT macro instructions must be used. 
R 
specifies that READ macro instructions are to be used. 
- 


specifies that dynamic buffering is requested in READ 
Pi macro instructions. S$ should not be specified if the 
( problem program provides the buffer pool. 


U 
specifies that records in the data set will be updated 
in place. If U is coded in combination with R, it 
must also be coded in combination with W. For 
example, MACRF=(RU,WU). 

W 


specifies that WRITE macro instructions are to be 
used. 


Source: The MACRF operand must be coded in the DCB macro 
instruction. | 


MSHI=relexp 
The MSHI operand specifies the address of the storage area 
used to contain the highest-level master index for the data 
set. The system uses this area to reduce the search time 
required to find a given record in the data set. The MSHI 
operand is coded only when the SMSI operand is coded. 


Source: The MSHI operand can be supplied in the DCB macro 
instruction or by the problem program before completion of 
the data control block exit routine. 


MSWA= 
The MSWA operand specifies the address of the storage work 
area to be used by the system when new records are being 
added to the data set. This operand is optional, but the 
system acquires a minimum-size work area if the operand is 
omitted. The MSWA operand is coded only when the SMSW 
operand is coded. 


Processing efficiency can be increased if more than a 
minimum-size work area iS provided. For more detailed 
information about work area size, see 
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Note: QISAM uses the DCBMSWA, DCBSMSI, and DCBSMSW fields 


in the data control block as a work area; these fields is 
contain meaningful information only when the data set is ae 
opened for BISAM. a 


Source: The MSWA operand can be supplied in the DCB macro 
instruction or by the problem program before completion of 
the data control block exit routine. 


NCP=absexp (maximum value is 99) 
The NCP operand specifies the maximum number of READ/WRITE 
macro instructions that are issued before the first CHECK 
Cor WAIT) macro instruction is issued to test for 
completion of the I/0 operation. The maximum number that 
can be specified may be less than 99, depending on the 
amount of virtual storage available in the region. If the 
NCP operand is omitted, 1 is assumed. If dynamic buffering 
is used, the value specified for the NCP operand must not 
aa number of buffers specified in the BUFNO 
operand. 


Source: The NCP operand can be supplied in the DCB macro 
instruction, in the DCB subparameter of a DD statement, or 
by the problem program before completion of the data 
control block open exit routine. 


OPTCD={CLILRI CWI} 
The OPTCD operand specifies the optional services performed 
by the control program. All optional services must be 
requested by one method; that is, by the data set label of 
an existing data set, this macro, or the DD statement on 
the DCB parameter. However, it can be modified by the 
problem program. The characters may be coded in any order 
and, when used in combination, no commas are permitted 
between characters. 


L | | 
specifies that the control program delete records that Mee 
have a first byte of all l's. (These records can be 
deleted when space is required for new records. To 
use the delete option, the relative key position (RKP) 
must be greater than 0 for fixed-length records and 
greater than 4 for variable-length records. ) 

R 
specifies that the control program place 
reorganization criteria information in certain fields 
of the data control block. (The problem program can 
analyze these statistics to determine when to 
reorganize the data set. This option is provided 
whenever the OPTCD operand is omitted from all 
sources. ) 

W 


specifies a validity check for write operations on 
direct access devices. 


SMSI=absexp (maximum value is 65535) 
The SMSI operand specifies the length, in bytes, required 
to contain the highest-level master index for the data set 
being processed. The size required can be determined from 
the DCBNCRHI field of the data control block. When an ISAM 
data set is created (with QISAM), the size of the 
highest-level index is inserted into the DCBNCRHI field. 
If the value specified in the SMSI operand is less than the 
value in the DCBNCRHI field, the task is abnormally 
terminated. 


Note: QISAM uses the DCBMSWA, DCBSMSI, and DCBSMSW fields 
as a work area; these fields contain meaningful information 
only when the data set is opened for BISAM. 
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Source: The SMSI operand can be supplied in the DCB macro 
instruction or by the problem program before completion of 
the data control block exit routine. 


SMSW=absexp (maximum value is 65535) 


The SMSW operand specifies the length, in bytes, of a work 
area that is used by BISAM. This operand is optional, but 
the system acquires a minimum-size work area if the operand 
is omitted. The SMSW operand 1s coded only when the MSWA 
operand is also coded. If the SMSW operand is coded but 
the size specified is less than the minimum required, the 
task is abnormally terminated. Data Administration Guide 
describes the methods of calculating the size of the work 
area. 


If unblocked records are used, the work area must be large 
enough to contain all the count fields (8 bytes each), key 
fields, and data fields contained on one direct access 
device track. 


If blocked records are used, the work area must be large 
enough to contain all the count fields (8 bytes each) and 
data fields contained on one direct access device track 
plus additional space for one logical record (CLRECL value). 


Note: QISAM uses the DCBMSWA, DCBSMSI, and DCBSMSW fields 
in the data control block as a work area; these fields 
contain meaningful information only when the data set is 
opened for BISAM. 


Source: The SMSW operand can be supplied in the DCB macro 
instruction or by the problem program before completion of 
the data control block exit routine. 


SYNAD= 


The SYNAD operand specifies the address of the error 
analysis routine given control when an uncorrectable 
input/output error occurs. The contents of the registers 
when the error analysis routine is given control are 
described in Appendix A, "Status Information Following an 
Input/Output Operation" on page 190. 


The error analysis routine must not use the save area 
pointed to by register 13 because this area is used by the 
system. The system does not restore registers when it 
regains control from the error analysis routine. The error 
analysis routine can issue a RETURN macro instruction that 
uses the address in register 14 to return control to the 
system. When control is returned in this manner, the 
system returns control to the problem program and proceeds 
as though no error had been encountered. If the error 
analysis routine continues processing, the results are 
unpredictable. 


If the SYNAD operand is omitted, the task is abnormally 
terminated when an uncorrectable input/output error occurs. 


Source: The SYNAD operand can be supplied in the DCB macro 
instruction or by the problem program. The problem program 
rq also change the error analysis routine address at any 
ime. 
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DCB—CONSTRUCT A DATA CONTROL BLOCK (BPAM) - 
an 


The data control block for the basic partitioned access method cy 
CBPAM) is constructed during assembly of the problem program. ae 
The DSORG and MACRF operands must be specified in the DCB macro 
instruction, but the other DCB operands can be supplied from 

other sources. Each of the BPAM DCB operand descriptions 

contains a heading, "Source.™ The information under this 

heading describes the sources that can supply the operand to the 

data control block. 


The DCB macro for BPAM is written: 


[BFALN={F1D}1] 
[,»BLKSIZE=absexp] 
{,BUFCB=relexp] 
[,»BUFL=absexp] 
[,BUFNO=absexp] 
[,DDNAME=symbol]} 
DSORG= {PO| POU} 
EODAD=relexp] 


=absexp] 
MACRF={(RIWIR,W)}2 
»NCP=absexp] 
esse ted 





: This parameter must be supplied before an OPEN macro is . 2 
areas for this DCB; it cannot be supplied in the open exit ae 
routine. 


When you create or process a BPAM data set, you can specify the 
following DCB operands: 


BFALN={F|D} 
Th e BFALN operand specifies the boundary alignment for each 
ue fer in the buffer pool when the buffer pool is 
constructed automatically or by a GETPOOL macro 
instruction. If the BFALN operand is omitted, the system 
provides doubleword alignment for each buffer. The 
characters that can be specified in the BFALN operand are: 


F 
specifies that each buffer is aligned on a fullword 
boundary that is not also a doubleword boundary. 


specifies that each buffer is aligned on a doubleword 
boundary. 


If the BUILD macro instruction is used to construct the 
buffer pool or if the problem program controls all 
buffering, the problem program must provide an area for the 
buffers and control buffer alignment. 


Source: The BFALN operand can be supplied in the DCB macro 
instruction, in the DCB subparameter of a DD statement, or 
by the problem program before completion of the data 
control block exit routine. 


BLKSIZE=absexp (maximum value KEYLEN + BLKSIZE is 32760) 
The BLKSIZE operand specifies the length, in bytes, of each 
data block for fixed-length records, or it specifies the 
maximum length, in bytes, for variable-length or 
undefined-length records. If keys are used, the length of 
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the key ae not included ir the value specified for the 
BLKSIZE operand. 


The actual block size that can be specified depends on the 
record format and the type of direct access device being 
used. If track overflow is used, the block size can be up 
to the maximum. If track overflow is not used, the maximum 
block size is determined by the track capacity of a single 
track on the direct access device being used. Device 
capacity for direct access devices is described in 

Appendix C, "Device Capacities" on page 203. For 
additional information about device capacity and space 
allocation, see ; 


For Jariabiecienoth records, the value specified in the 
BLKSIZE operand must include the maximum logical record 
length Cup to 32756 bytes) plus 4 bytes for the block 
descriptor word (BDW). 


For undefined-length records, the value specified for the 
BLKSIZE operand can be altered by the problem program when 
the actual length becomes Known to the problem program. 
The value can be inserted into the DCBBLKSI field of the 
data control block or specified in the length operand of a 
READ/WRITE macro instruction. 


Source: The BLKSIZE operand can be supplied in the DCB 
macro instruction, in the DCB subparameter of a DD 
statement, by the problem program before completion of the 
data control block exit. routine, or by the data set label 
of an existing data set. | 


BUFCB=relexp 

The BUFCB operand specifies the address of the buffer pool 
control block when the buffer pool is constructed by a 
BUILD macro instruction. 


If the buffer pool is constructed automatically or by a 
GETPOOL: macro instruction, the system places the address of 
the buffer pool control block into the data control block 
and the BUFCB operand can be omitted. Also, if the problem 
eating! controls all buffering, the BUFCB operand should be 
omitted. 


Source: . The BUFCB operand can be supplied in the DCB macro 
instruction or by the problem program before completion of 
the data control block exit routine. 


BUFL=absexp (maximum value is 32760) 
The BUFL operand specifies the length, in bytes, of each 
buffer in the buffer pool when the buffer pool is acquired 
automatically. If the BUFL operand is omitted and the 
buffer pool is acquired automatically, the system acquires 
buffers with a length that is equal to the sum of the 
values specified in the KEYLEN and BLKSIZE operands. If 
the problem program requires longer buffers, the BUPFL 
operand should be specified. 


If the problem program controls all buffering, the BUFL 
operand is not required. 


Source: The BUFL operand can be supplied in the DCB macro 
instruction, in the DCB subparameter of a DD statement, or 
by the problem program before completion of the data 
control block exit routine. 


BUFNO=absexp (maximum value is 255) 
The BUFNO operand specifies the number of buffers to be 
constructed by a BUILD macro instruction, or it specifies 
bata Neila of buffers to be acquired automatically by the 
system. 
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If the problem program controls all buffering or if the 
buffer pool is constructed by a GETPOOL macro instruction, 
the BUFNO operand should be omitted. 


Source: The BUFNO operand can be supplied in the DCB macro 
instruction, in the DCB subparameter of a DD statement, or 
by the problem program before completion of the data 
control block exit routine. 


DDNAME= | 
The DDNAME operand specifies the name used to identify the 
job control language data definition (DD) statement that 
defines the data set being created or processed. 


Source: The DDNAME operand can be supplied in the DCB 
macro instruction or by the problem program before an OPEN 
macro instruction is issued to open the data set 


DSORG={PO| POU} 
The DSORG operand specifies the data set organization and 
whether the data set contains any location-dependent 
information that would make it unmovable. The characters 
that can be specified are: 


PO 
specifies a partitioned data set organization. 


POU | 
specifies a partitioned data set organization and that 
the data set contains location-dependent information. 


Note: If BSAM or QSAM is used to add or retrieve a single 
member of a partitioned data set, a sequential access 
method is being used, and the DSORG operand is specified as 
PS or PSU. The name of the member being processed in this 
manner is supplied ina DD statement. 


Source: | The DSORG operand must be specified in the DCB 
macro instruction. 


EODAD=relexp 

The EODAD operand specifies the address of the routine 
given control when the end of the input data set is 
reached. Control is given to this routine when an input 
request is made CREAD macro instruction) and there are no 
additional input records to retrieve. The routine is 
entered when a CHECK macro instruction 1s issued and the 
end of the data set is reached. If the end of the data set 
is reached and no EOQDAD address has been supplied, the task 
is abnormally terminated. For e cee nas ane maa en on 
the EOQDAD routine, see Data Administ . juide. 





Source: The EODAD operand can be supplied in the DCB macro 
instruction or by the problem program before the end of the 
data set is reached. 


EXLST=relexp 
The EXLST operand specifies the address of the problem 
program exit list. The EXLST operand is required if the 
problem program uses the data control block exit routine 
for additional processing or if the DCB abend exit is used 
for abend condition analysis. 


For the format and requirements of the exit list 
processing, see Appendix D, "DCB Exit List Format and 
Contents" on page 206. For rial rie informa tion about 
exit list processing, see Data Administre ; ide. 





Source: The EXLST operand can be supplied in the DCB macro 
instruction or by the problem program before the OPEN macro 
instruction is issued to open the data set. 
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KEYLEN=absexp (maximum value is 255) © 
eo The KEYLEN operand specifies the length, in bytes, of the 
( : key associated with each data block in the direct access 
device data set. If the key length is not supplied from 
any source by the end of the data control block exit 
routine, a key length of zero (no keys) is assumed. 


Source: The KEYLEN operand can be supplied in the DCB 
macro instruction, in the DCB subparameter of a DD 
statement, by the problem program before the completion of 
the data control block exit routine, or by the data set 
label of an existing data set. If KEYLEN=0 is specified 
in the DCB macro instruction, a special indicator is set in 
RECFM so that KEYLEN cannot be supplied from the DCB 
subparameter of a DD statement or data set label of an 
existing data set. KEYLEN=0 can be coded only in the DCB. 
macro instruction and will be ignored if specified in the 
DD statement. 


LRECL=absexp (maximum value is 32760) 
The LRECL operand specifies the length, in bytes, of each 
fixed-length logical record in the data set; It is required 
only for fixed-length records. The value specified in the 


LRECL operand cannot exceed the value specified in the 
BLKSIZE operand. 


If the records are unblocked, the value specified in the 
LRECL operand must equal the value specified in the BLKSIZE 
operand. If the records are blocked, the value specified 
in the LRECL operand must be evenly divisible into the 
value specified in the BLKSIZE operand. 


Source: The LRECL operand can be supplied in the DCB macro 
instruction, in the DCB subparameter of a DD statement, by 
the problem program before completion of the data control 

( pare ata routine, or by the data set label of an existing 
ata set. 


MACRF={(RIWIR,W)} 
The MACRF operand specifies the type of macro instructions 
CREAD, WRITE, and NOTE/POINT) that are used to process the 
data set. The characters that can be specified are: 


R 
specifies that READ macro instructions are to be used. 
This operand automatically provides the capability to 
use both the NOTE and POINT macro instructions with 
the data set. 

W 


specifies that WRITE macro instructions are to be 
used. This operand automatically provides the 
capability to use both the NOTE and POINT macro 
instructions with the data set. 


All BPAM READ and WRITE macro instructions issued must be 
tested for completion using a CHECK macro instruction. The 
MACRF operand does not require any coding to specify that a 
CHECK macro instruction will be used. 


Source: The MACRF operand must be specified in the DCB 
macro instruction. 


NCP=absexp (maximum value is 99) 
The NCP operand specifies the maximum number of READ and 
WRITE macro instructions that will be issued before the 
first CHECK macro instruction is issued. The maximum 
number may be less than 99, depending on the amount of 
virtual storage available in the region. If chained 
a scheduling is specified, the value of NCP determines the 
maximum number of channel program segments that can be 
chained and must be specified as more than 1. If the NCP 
operand is omitted, 1 is assumed. 
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Source: The NCP operand can be supplied in the DCB macro 


instruction, in the DCB subparameter of a DD statement, or va 


by the problem program before completion of the data (’ 


control block open exit routine. Nae” 


OPTCD={{ciwtcl} 
{CJHIC]} 
{CIWEH][C]}} 
The OPTCD operand specifies the optional services performed 
by the system. The characters that can be specified (in 


any order, in any combination, and without commas between 
characters) are: 


Cc | | 
specifies that chained scheduling is used. This 
option iS ignored for direct access devices. 


If OPTCD=H is coded in the DCB parameters of a DD 
statement, H specifies that, if a partitioned data set 
1s being opened for input and resides on an MSS 
device, then, at OPEN time, the data set is to be 
staged to EOF on the virtual DASD device. 


specifies that the system is to perform a validity 
check for each record written. 


Source: The OPTCD operand can be supplied in the DCB macro 
instruction, in the DCB subparameter of a DD statement, or 
by the problem program before an OPEN macro instruction is 
issued to open the data set. However, all optional 
services must be requested from the same source. | 


RECFM={{UCLTICAIM]} 
{VEBIETIITILETILAIMI} | sea 
CLFEBETII{&CTICAIMI}}3 | 

The RECFM operand specifies the record format and 
characteristics of the data set being created or processed. 
All the record formats shown above can be specified, but in 
those formats that show blocked records, the problem 
program must perform the blocking and deblocking of logical 
records; BPAM recognizes only data blocks. The characters 
that can be specified are: 


A ; 
specifies that the records in the data set contain 
ISO/ANSI/FIPS control characters. For a description 
of control characters, see Appendix E, "Control 
Characters™ on page 208. 

B 
specifies that the data set contains blocked records. 

FE 
specifies that the data set contains fixed-length 
records. 

M 
specifies that the records in the data set contain 
machine code control characters. For a description of 
control characters, see Appendix E, "Control 
Characters" on page 208. 

T 


specifies that track overflow is used with the data 
set. Track overflow allows a record to be written 
partially on one track of a direct access device and 
the remainder of the record written on the following 
track (if required). Chained scheduling COPTCD=C) 


cannot be used if the track overflow is used. a 
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specifies that the data set contains undefined-length 
records. 


specifies that the data set contains variable-length 
records. 


Source: The RECFM operand can be supplied in the DCB macro 
instruction, in the DCB subparameter of a DD statement, by 
the problem program before completion of the data control 
Heroes an routine, or by the data set label of an existing 
ata set. 


SYNAD=relexp 


The SYNAD operand specifies the address of the error 
analysis CSYNAD) routine to be given control when an 
uncorrectable input/output error occurs. The contents of 
the registers when the error analysis routine is given 
control are described in Appendix A, “Status Information 
Following an Input/Output Operation™ on page 190. 


The error analysis routine must not use the save area 
pointed to by register 13, because this area is used by the 
system. The system does not restore resisters when it 
regains control from the error analysis routine. The error 
analysis routine can return control to the system by 
issuing a RETURN macro instruction. If control is returned 
to the system, the system returns control to the problem 
program and proceeds as though no error had been 
encountered. 


If the SYNAD operand is omitted, the task is abnormally 
terminated when an uncorrectable input/output error occurs. 


Source: The SYNAD operand can be supplied in the DCB macro 


instruction or by the problem program. The problem program 
can also change the error routine address at any time. 
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DCB-—CONSTRUCT A DATA CONTROL BLOCK (BSAM) 


The data control block for the basic sequential access method 
CBSAM) is constructed during assembly of the problem program. nee 
The DSORG and MACRF operands must be coded in the DCB macro 
instruction, but the other DCB operands can be supplied to the 

data control block from other sources. Each DCB operand 

description contains a heading, "Source." The information under 
ee describes the sources of an operand ne can be 

supplie 


The DCB macro for BSAM is written: 


[symbol] [BFALN={F|D}1 
[,BFTEK=R] 
{,BLKSIZE=absexp] 
{,BUFCB=-relexp] 
[ ,BUFL=absexp] 
[»,BUFNO=absexp] 
[ ,BUFOFF= fabsexp|L}1 
[ » DDNAME=symbo]]? 
[,DEVD={{DA 

7 


» DEN={1/21314}] 
t TRTCH={C|E/ET|T3I} 


R 
PRTSP={0] 1/2133 1} 


{RD 
MODE=[C wes 
STACK={ 


iF 
. 
[, 
[, 
R 
[, 
[, —_ 
[,FUNC= cr Se 





{ B 

{ [B 

{ [U 

{ CT 

{ [T 

{ [B 

[,RECFM= Tl 

{ S| [AIMI]} 

{ $s] 

{ S| [A]M1}}] 

i This parameter must be supplied before an OPEN macro is 

sree for this DCB; it cannot be supplied in the open exit 
routine. 
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ollowing describes the operands that can be specified in 
CB macro instruction for a BSAM data set: 


={F|D} 

The BFALN operand specifies the boundary alignment for each 
buffer in the buffer pool when the buffer pool is 
constructed automatically or by a GETPOOL macro 
instruction. If the BFALN operand is omitted, the system 
provides doubleword alignment for each buffer. 


If the data set being created or processed contains 
ISCII/ASCII tape records with a block prefix, the block 
prefix is entered at the beginning of the buffer, and data 
alignment depends on the length of the block prefix. For a 
description of how to specify the block prefix length, see 
the description of the DCB BUFOFF operand. 


The characters that can be specified are: 


F 
specifies that each buffer is on a fullword boundary 
that is not also a doubleword boundary. 


specifies that each buffer is on a doubleword 
boundary. 


If the BUILD macro instruction is used to construct the 
buffer pool or if the problem program controls all 
buffering, the problem program must provide an area for the 
buffers and control buffer alignment. 


Source: The BFALN operand can be supplied in the DCB macro 
instruction, in the DCB subparameter of a DD statement, or 
by the problem program before completion of the data 
control block exit routine. If both the BFALN and BFTEK 
operands are specified, they must be supplied by the same 
source. 


=R 

The BFTEK=R operand specifies that BSAM is used to read 
unblocked variable-length spanned records with Keys from a 
BDAM data set. Each read operation reads one segment of 
the record and places it in the area designated in the READ 
macro instruction. The first segment enters at the 
beginning of the area, but all subsequent segments are 
offset by the length of the key Conly the first segment has 
a key). The problem program must provide an area in which 
it can assemble a record, identify each segment, and 
assemble the segments into a complete record. 


Source: The BFTEK operand can be supplied in the DCB macro 
instruction, in the DCB subparameter of a DD statement, or 
by the problem program before completion of the data 
control block exit routine. If both the BFTEK and BFALN 
operands are specified, they must be supplied from the same 
source. 


ZE=absexp (maximum value KEYLEN + BLKSIZE is 32760) 

The BLKSIZE operand specifies the maximum block length in 
bytes. For fixed-length, unblocked records, this operand 
specifies the record length. The BLKSIZE operand includes 
only the data block length; if keys are used, the length of 
the key is not included in the value specified for the 
BLKSIZE operand. 


The actual value that can be specified in the BLKSIZE 
operand depends on the device type and the record format 
being used. Device capacity is shown in 

Appendix C, “Device Capacities™ on page 203. For 
additional information about device capacity, see Data 
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For direct access devices when track overflow is used or 


variable-length spanned records are being processed, the a 
value specified in the BLKSIZE operand can be up to the fo 
maximum value. For other record formats used with direct ow 


access devices, the value specified for BLKSIZE cannot 
exceed the capacity of a single track. 


If fixed-length records are used, the value specified in 
the BLKSIZE operand should be an integral multiple of the 
value specified for the logical record length CLRECL). 


If variable-length records are used, the value specified in 
the BLKSIZE operand must include the maximum logical record 
length Cup to 32756 bytes) plus the 4 bytes required for 
the block descriptor word (BDW). For format-D 
variable-length records CISCII/ASCII data sets), the 
minimum value for BLKSIZE is 18 bytes. The maximum value 
is 2048 bytes. For additional information about the 
BLKSIZE restrictions, see Data Administration Guide. 


If ISCII/ASCII tape records with a block prefix are 
processed, the value specified in the BLKSIZE operand must 
also include the length of the block prefix. 


If BSAM is used to read variable-length spanned records 
from a BDAM data set, the value specified for the BLKSIZE 
operand must be as large as the longest possible record 
segment in the BDAM data set, including 4 bytes for the 
segment descriptor word CSDW) and 4 bytes for the block 
descriptor word (BDW). 


If undefined-length records are used, the value specified 
for the BLKSIZE operand can be altered by the problem 
program when the actual length becomes known to the problem 
program. The value can be inserted directly into the 
DCBBLKSI field of the data control block or specified in 
the length operand of a READ/WRITE macro instruction. 


Source: The BLKSIZE operand can be supplied in the DCB 
macro instruction, in the DCB subparameter of a DD 
statement, by the problem program before completion of the 
data control block exit routine, or by the data set label 
of an existing data set. 


Note: The maximum block size for Version 3 ISO/ANSI/FIPS 
tapes CISO 1001-1979 and ANSI X3.27-1978) is 2048 bytes. 
An attempt to exceed 2048 bytes for a Version 3 tape 
Artesia in a label validation installation exit being 
aken. 


BUFCB= 
The BUFCB operand specifies the address of the buffer pool 
control block ina buffer pool constructed by a BUILD macro 
instruction. 


If the buffer pool is to be constructed automatically or by 
a GETPOOL macro instruction, the system places the address 
of the buffer pool control block into the data control 
block, and the BUFCB operand should be omitted. If the 
problem program is to control all buffering, the BUFCB 
operand 1s not required. 


Source: The BUFCB operand can be supplied in the DCB macro 
instruction or by the problem program before completion of 
the data control block exit routine. 


BUFL=absexp (maximum value is 32760) 
The BUFL operand specifies the length, in bytes, for each 
buffer in the buffer pool when the buffer pool 1S acquired 
automatically. The system acquires buffers with a length 
equal to the sum of the values specified in the KEYLEN and ( 
BLKSIZE operands if the BUFL operand is omitted; if the 
problem program requires larger buffers, the BUFL operand 
must be specified. If the BUFL operand is specified, it 


7 
Qe we 
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must be at least as large as the value specified in the 
BLKSIZE operand. If the data set is for card image mode, 
the BUFL operand should be specified as 160. The 
description of the DEVD operand contains a description of 
card image mode. 


If the data set contains ISCII/ASCII tape records with a 
block prefix, the value specified in the BUFL operand must 
ley oi the block length plus the length of the block 
prefix. 


If the problem program is to control all buffering or if 
the buffer pool is to be constructed by a GETPOOL or BUILD 
macro instruction, the BUFL operand is not required. 


Source: The BUFL operand can be supplied in the DCB macro 
instruction, in the DCB keyword on a DD statement, or by 
the problem program before completion of the data control 
block exit routine. 


BUFNO=absexp (maximum value is 255) 


The BUFNO operand specifies the number of buffers 
constructed by a BUILD macro instruction or the number of 
buffers to be acquired automatically by the system. 


If the problem program controls all buffering or if the 
buffer pool is constructed by a GETPOOL macro instruction, 
the BUFNO operand should be omitted. 


Source: The BUFNO operand can be supplied in the DCB macro 
instruction, in the DCB subparameter of a DD statement, or 
by the problem program before completion of the data 
control block exit routine. | 


BUFOFF={absexp|L} 


The BUFOFF operand specifies the length, in bytes, of the 
block prefix used with an ISCII/ASCII tape data set. When 
BSAM is used to read an ISCII/ASCII tape data set, the 
problem program must use the block prefix length to 
determine the location of the data in the buffer. When 
BSAM is used to write an output ISCII/ASCII tape data set; 
the problem program must insert the block prefix into the 
buffer, followed by the data (BSAM considers the biock 
prefix as data). The block prefix and data can consist of 
any characters that can be translated into 7-bit 
ISCII/ASCII code; any character that cannot be translated 
1s replaced with a substitute character. (For a more 
detailed description of ISCIIZASCII translation 
characteristics, =Ke | 2 De ind File 

.) For Porina t= D necorde: the RDH must be binary; 
if RECFM=D and BUFOFF=L, the RDW and BDW must both be 
binary. On output, the control program translates ei BDW 
and RDW to ISCII/ASCII characters and, on input, 
control program converts ISCII/ASCII data to BDW per RDW. 
The following can be specified in the BUFOFF operand: 


absexp 
specifies the length, in bytes, of the block prefix. 
This value can be from 0 to 99 for an input data set. 
The value must be 0 for writing an output data set 
with fixed-length or undefined-length records (CBSAM 
considers the block prefix part of the data record). 





specifies that the block prefix is 4 bytes long and 
contains the block length. BUFOFF=L is used when 
format-D records CISCII/ASCII) are processed. When 
BUFOFF=L is specified, the BSAM problem program can 
process the data records Cusing READ and WRITE macro 
instructions) in the same manner as if the data were 
in format-V variable-length records. For further 
information on this operand, see NVariable- Length 
Records—Format D" in Data Administra Civhi 
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If the BUFOFF operand is omitted for an input data set with 


format-D records, the system inserts the record length into ox 
the DCBLRECL field of the data control block; the problem aa 
program must obtain the length from this field to process  w 


the record. 


If the BUFOFF operand is omitted from an output data set 
with format-D records, the problem program must insert the 
actual record length into the DCBBLKSI field of the data 
control block or specify the record length in the length 
operand of a WRITE macro instruction. 


Source: The BUFOFF operand can be supplied in the DCB 
macro instruction, in the DCB subparameter of a DD 
statement, or by the problem program before an OPEN macro 
instruction is issued to open the data set. BUFOFF=absexp 
can also be supplied by the label of an existing data set; 
Page cannot be supplied by the label of an existing 
ata set. 


DDNAME= 
The DDNAME operand specifies the name used to identify the 
job control language data definition (DD) statement that 
defines the data set being created or processed. 


Source: The DDNAME operand can be supplied in the DCB macro 
instruction or by the problem program before an OPEN macro 
instruction is issued to open the data set. 


DEVD={DA] TA] PRIPC|IRD}L,options] 
The DEVD operand specifies the device type where the data 
set can or does reside. The device types above are shown 
with the optional operand(s) that can be coded when a 
particular device is used. The devices are listed in order 
of device independence. For example, if DEVD=DA is coded 
in a DCB macro instruction Cor the DEVD operand is omitted, 
which causes a default to DA), the data control block 
constructed during assembly could later be used for any of 
the other devices, but, if DEVD=RD is coded, the data 
control block can be used only with a card reader or card 
reader punch. Unless you are certain that device 
interchangeability is not required, you should either code 
DEVD=DA or omit the operand and allow it to default to DA. 


es Pity 


If system input is directed to an intermediate storage 
device, the DEVD operand is omitted, and the job control 
language for the problem program designates the system 
input device to be used. Likewise, if system output is 
directed to an intermediate storage device, the DEVD 
operand is omitted, and the job control language for the 
problem program designates the system output device to be 
used. If DEVD=PR, PC, or RD is coded, the DCB macro should 
not be coded within the first 16 bytes of addressability 
for the control section. 


The DEVD operand is discussed below according to individual 
device type: 


DEVD=DA 
t,KEYLEN=absexp ] 
specifies that the data control block can be used for 
a direct access device (Cor any of the other device 
types described following DA). 


KEYLEN=absexp 
The KEYLEN operand can be specified only for data 
sets that reside on direct access devices. 

Because the KEYLEN is usually coded without a 
DEVD operand (default taken), the description of 
the KEYLEN operand is in alphabetic sequence with ee 
the other operands. ane 
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DEVD=TA 
{,DEN={1|21314}] 
Qo {> TRTICH={CIE[ETIT}] 
( . Specifies that the data control block can be used for 
ae “a magnetic tape data set (or any of the other device 


types described following TA). If TA is coded, the 
following optional operands can be coded: 


DEN={1/21314} 
The DEN operand Sseci fies the recording density 
in the number of bits-per-inch per track as shown 
in the following: 


Recording Density 





\ DEN 7-Track 9-Track L8-Track 
1 556 N/A N/A 
2 800 800 C(NRZI)? NZA 
3 N“A 1600 (PE)2 NZA 
4 N/A 6250 (CGCR)*? N/A 


fot 


NRZI is for nonreturn—-to~-zero inverted mode. 
2 PE is for phase encoded mode. 
= GCR is for group coded recording mode. 


If the DEN operand is not supplied by any source, 
the highest applicable density is assumed. 


TRICH={C/[EIET!|T} 
The TRICH operand specifies the recording 
technique for 7-track tape. One of the above 
G-character combinations can be coded. If the 
TRICH operand is omitted, odd parity with no 
bi. translation or conversion is assumed. The 
( characters that can be specified are: 





Cc 
specifies that the data-conversion feature 
is used with odd parity and no translation. 

E 
specifies even parity with no translation or 
conversion. 

ET 
specifies even parity with BCDIC to EBCDIC 
translation required and no data-~conversion 
feature. 

T 


specifies that BCDIC to EBCDIC translation 
is required with odd parity and no 
data-conversion feature. 


DEVD=PR 
[»>PRTSP={0/1]2/3}] 
Specifies that the data control block is used for an 
on-line printer Cor any of the other device types 
following PR). If PR is coded, the following optional 
operand can be coded: 


a dite ald 
he PRTSP operand specifies the line spacing on 
tbs printer. This operand is not valid if the 
RECFM operand specifies either machine CRECFM=M), 
ISO/ANSI/FIPS CRECFM=A) control characters. If — 
the PRTSP operand is not specified from any 
source, 1 is assumed. 
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The characters that can be specified are: 


0 
specifies that spacing 1s suppressed (no 


space). 

1 
specifies single spacing. 

2 
specifies double spacing (Cone blank line 
between printed lines). 

3 
specifies triple spacing (two blank lines 
between printed lines). 

DEVD=PC 
[»MODE=[C/iE] 


[,STACK={]]2}] 

[»>FUNC={IIPIPWEXTIIRIRPEDI | RWETI | RWPIXTICDIUWETI}/] 
Specifies that the data control block is used for a 
card punch (Cor any of the other device types following 


PC). 


If PC is coded, the following optional operands 


can be specified: 


MODE=[C|E] 


The MODE operand specifies the mode of operation 
for the card punch. The characters that can be 
specified Cif the MODE operand is omitted, E is 
assumed) are: 


Cc 
specifies that the cards are to be punched 
in card image mode. In card image mode, the 
12 rows in each card column are punched from 
two consecutive bytes in virtual storage. 
Rows 12 through 3 are punched from the 
low-order 6 bits of one byte and rows 4 
through 9 are punched from the low-order 6 
bits of the following byte. 


specifies that cards are to be punched in 
EBCDIC code. 


STACK={1 | 2} 


The STACK operand specifies the stacker bin where 
the card is placed after punching 1s completed. 
If this operand is omitted, stacker number 1 is 
used. The characters that can be specified are: 


i 


specifies stacker number 1. 


2 
specifies stacker number 2. 


FUNC={I|P]PWIXTIIRIRPLDI|RWEITI | RWPEXTILCDI|WiTI} 
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The FUNC operand defines the type of 3525 card 
punch data sets that are used. If the FUNC 
operand is omitted from all sources, a data set 
opened for input defaults to read only, and a 
data set opened for output defaults to punch 
only. The characters that can be specified in 
the FUNC operand are: 


D | 
specifies that the data protection option is 
to be used. The data protection option 
prevents punching information into card 
columns that already contain data. When the 
data protection option is used, an 80-byte 
data protection image (DPI) must have been 
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previously stored in SYS]1.IMAGELIB. Data 
protection applies only to the output/punch 
portion of a read and punch or read punch 
and print operation. 


specifies that the data in the data set is 

to be punched into cards and printed on the 
cards; the first 64 characters are printed 

on line 1 of the card and the remaining 16 

characters are printed on line 3 


specifies that the data set is for punching 
cards. See the description of the character 
X for associated punch and print data sets. 


specifies that the data set is for reading 
cards. 


specifies that the two-line print option is 
used. The two-line print option allows two 
lines of data to be printed on the card 
Clines 1 and 3). If T is not specified, the 
multiline print option is used; this allows 
printing on all 25 possible print lines. In 
either case, the data printed may be the 
same as the data punched in the card, or it 
may be entirely different data. 








specifies that the data set is for printing. 
See the description of the character X for 
associated punch and print data sets. 


specifies that an associated data set is 
opened for output for both punching and 
printing. Coding the character X is used to 
distinguish the 3525 printer output data set 
from the 3525 punch output data set. 


Note: If data protection is specified, the data 
protection image (DPI) must be specified in the 
Be parameter of the DD statement for the data 
set. 


DEVD=RD 

[,MODE=[C{[E]1f£01R1]] 

[,STACK={1]|2}1 

[>FUNC={I] PI] PWEXTIIRIRPEDI|RWEIT] | RWPEXTICLDIIWETI}1 
Specifies that the data control block 1s used with a 
card reader or card read punch. If RD is specified, 
the data control block cannot be used with any other 
device type. When RD is coded, the following optional 
operands can be specified: 


MODE=[CIE]LO|R] 
The MODE operand specifies the mode of operation 
for the card reader. The characters that can be 
specified are: 


Cc 
specifies that the cards to be read are in 
card image mode. In card image mode, the 12 
rows in each card column are read into two 
consecutive bytes of virtual storage. Rows 
12 through 3 are read into one byte and rows 
: ote 9 are read into the following 
yte. 
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E 
specifies that the cards to be read contain ; 
data in EBCDIC code. i 
- WS 
specifies that the program runs in 
| optical-mark-read mode (3505 card reader). 
R 


specifies that the program runs in 
read-column-eliminate mode (3505 card reader 
or 3525 card punch, read feature). 


Note: If the MODE operand for a 3505 or 3525 is 
specified in the DCB subparameter of a DD 
statement, either C or E must be specified if R 
or 0 is specified. 


STACK={]1] 2} 
The STACK operand specifies the stacker bin where 
the card is placed after reading is completed. 
If this operand is omitted, stacker number 1 is 
used. The characters that can be specified are: 


i 


specifies stacker number 1. 


2 
specifies stacker number 2. 


FUNC={I|PIPWEIXTI|RIRPED] |RWETI] | RWPEXTICDIIWLTI} 

The FUNC operand defines the type of 3525 card 
punch data sets that are used. If the FUNC 
operand is omitted from all sources, a data set 
opened for input defaults to read only, anda 
data set opened for output defaults to punch 
only. The characters that can be specified in 
the FUNC operand are: 


D 
specifies that the data protection option is 
to be used. The data protection option 
prevents punching information into card 
columns that already contain data. When the 
data protection option is used, an 80-byte 
data protection image (DPI) must have been 
previously stored in SYS1.IMAGELIB. Data 
protection applies only to the output/punch 
portion of a read and punch or read punch 
and print operation. 


specifies that the data in the data set is 

to be punched into cards and printed on the 
cards; the first 64 characters are printed 

on line 1 of the card and the remaining 16 

characters are printed on line 3. 


specifies that the data set is for punching 
cards. See the description of the character 
X for associated punch and print data sets. 


specifies that the data set is for reading 
cards. 


specifies that the two-line print option is 
used. The two-line print option allows two 
lines of data to be printed on the card 
Clines 1 and 3). If T is not specified, the 
multiline print option is used; this allows 
printing on all 25 possible print lines. In 
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either case, the data printed may be the 
same as the data punched in the card, or it 
may be entirely different data. 


W 
specifies that the data set is for printing. 
See the description of the character X for 
associated punch and print data sets. 

xX 


specifies that an associated data set is 
opened for output for both punching and 
printing. Coding the character X is used to 
distinguish the 3525 printer output data set 
from the 3525 punch output data set. 


Note: If data protection is specified, the 
data protection image (DPI) must be 
specified in the FCB subparameter of the DD 
statement for the data set. 


Source: The DEVD operand can be supplied only in 
the DCB macro instruction. However, the optional 
operands can be supplied in the DCB macro 
instruction, the DCB subparameter of a DD 
statement, or by the problem program before 
completion of the data control block exit 
routine. 


DSORG={PS| PSU} 


EODAD 


EXLST 


The DSORG operand specifies the organization of the data 
set and if the data set contains any location~dependent 
information that would make it unmovable. The following 
can be specified: 


PS 
specifies a physical sequential data set. 


PSU 
specifies a physical sequential data set that contains 
location-dependent information that would make it 
unmovable. 


Source: The DSORG operand must be coded in the DCB macro 
instruction. 


The EODAD operand specifies the address of the routine 
given control when the end of an input data set is reached. 
If the record format is RECFM=FS or FBS, the end-of-data 
condition 1s sensed when a file mark is read or when more 
data is requested after reading a truncated block. The 
end-of-data routine is entered when the CHECK macro 
instruction determines that the READ macro instruction 
reached the end of the data. If the end of the data set is 
reached but no EODAD address has been supplied, the task is 
abnormally terminated. For additional information on the 
EODAD rautine, see ini tj j 


When the data set has been opened for UPDAT and volumes are 
to be switched, the problem program should issue a FEOV 
macro instruction after the EODAD routine has been entered. 


Source: The EODAD operand can be supplied in the DCB macro 
instruction or by the problem program before the end of the 
data set is reached. 


=relexp 

The EXLST operand specifies the address of the problem 
program exit list. The EXLST operand is required if the 
problem program requires additional processing for user 
labels, user totaling, data control block exit routine, 


end-of-volume, block count exits, to define a forms control 
buffer CFCB) image, use the JFCBE exit (for the IBM 3800 
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Printing Subsystem), or to use the DCB abend exit for abend 
condition analysis. 


For the format and requirements of exit list processing, 
see Appendix D, "DCB Exit List Format and Contents" on 
page 206. For additional information about exit list 
processing, see ini j l , 





Source: The EXLST operand can be supplied in the DCB macro 
instruction or by the problem program any time before the 
exit is required by the problem program. 


KEYLEN=absexp (maximum value is 255) 
The KEYLEN operand specifies the length, in bytes, for the 
key associated with each data block in a direct access 
device data set. If the key length is not supplied from 
any source before completion of the data control block exit 
routine, a key length of zero (no keys) is assumed. 


Source: The KEYLEN operand can be supplied in the DCB 
macro instruction, in the DCB subparameter of a DD 
statement, by the problem program before the completion of 
the data control block exit routine, or by the data set 
label of an existing data set. If KEYLEN=0 is specified in 
the DCB macro instruction, a special indicator is set in 
RECFM so that KEYLEN cannot be supplied from the DCB 
subparameter of a DD statement or data set label of an 
existing data set. KEYLEN=0 can be coded only in the DCB 
macro instruction and will be ignored if specified in the 
DD statement. 


LRECL= 7 Labsexp | X} 
he LRECL operand specifies the length, in bytes, for 
elias length records, or it specifies the maximum length, 
in bytes, for variable-length records. LRECL=X is used for 
variable-length spanned records that exceed 32756 bytes. 


Except when variable-length spanned records are used, the — 
value specified for the LRECL operand cannot exceed the 5 | 
value specified for the BLKSIZE operand. oF? 


Except when variable-length spanned records are used, the 
LRECL operand can be omitted for BSAM; the system uses the 
value specified in the BLKSIZE operand. If the LRECL value 
1s coded, it is coded as described in the following. 


For fixed-length records that are unblocked, the value 
specified in the LRECL operand should be equal to the value 
specified in the BLKSIZE operand. For blocked fixed-length 
records, the value specified in the LRECL operand should be 
evenly divisible into the value specified in the BLKSIZE 
abe However, the LRECL operand will not be validity 
checked. 


For variable-length records, the value specified in LRECL 
must include the maximum data length Cup to 32752 bytes) 
plus 4 bytes for the RDW. 


For undefined-length records, the LRECL operand should be 

omitted; the actual length can be supplied dynamically ina 

READ/WRITE macro instruction. When an undefined-length 

record is read, the actual length of the record is returned 

a ace system in the DCBLRECL field of the data control 
ock. 


When BSAM is used to create a BDAM data set with 
variable-length spanned records, the LRECL value should be 
the maximum data length Cup to 32752) plus four bytes for 
the record descriptor word (RDW), or, if the logical record 
length is greater than 32756 bytes, LRECL=X is specified. 


Source: The LRECL operand can be supplied in the DCB macro 
instruction, in the DCB subparameter of a DD statement, by 
the problem program before completion of the data control 
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block exit routine, or by the data set label of an existing 
data set. 


MACRF={{(RIC|P])} 


CC(WEIC|PIL1)} 

CCRIC]PI],WIC[P] )}} 
The MACRF operand specifies the type of macre instructions 
CREAD, WRITE, CNITRL, and NOTE/POINT) that are used with the 
data set being created or processed. The BSAM MACRF 
operand also provides the special form (MACRF=WL) for 
creating a BDAM data set. The MACRF operand can be coded 
in any of the forms shown above. The following characters 
can be coded: 


Cc 
specifies that the CNTRL macro instruction is used 
with the data set. If C is specified to be used with 
a card reader, a CNTIRL macro instruction must follow 
every input request. 


specifies that BSAM is used to create a BDAM data set. 
This character can be specified only in the 
combination MACRF=WL. 


specifies that POINT macro instructions are used with 
the data set being created or processed. Specifying P 
in the MACRF operand also automatically provides the 
capability of using NOTE macro instructions with the 
data set. P should not be coded for SYSIN or SYSOUT 
data sets. (See explanations of the NOTE and POINT 
macro instructions. ) 


specifies that READ macro instructions are to be used. 
specifies that WRITE macro instructions are to be 
used. 
Note: Each READ and WRITE macro instruction issued in the 
problem program must be checked for completion by a CHECK 


macro instruction. 


Source: The MACRF operand must be specified in the DCB 
macro instruction. 


NCP=absexp (maximum value is 99) 


The NCP operand specifies the maximum number of READ/WRITE 
macro instructions that will be issued before the first 
CHECK macro instruction is issued to test for completion of 
the I/0 operation. The maximum number may be less than 99, 
depending on the amount of virtual storage available in the 
region. If the NCP operand is omitted, 1 is assumed. 


Source: The NCP operand can be supplied in the DCB macro 
instruction; in the DCB subparameter of a DD statement, or 
by the problem program before completion of the data 
control block open exit routine. 


OPTCD={1{B} 
{T 


a. 

{ULCI} 
{CCTICBICUI} 
{HEI ZILBI} 
CTJICILUI} 
{WICICTIEBILUI} 
{TZCCIETICBICUI} 
CQ(ICIL(BI[T} 


The OPTCD operand specifies the opticnal services that are 
used with the BSAM data set. Two of the optional services, 
OPTCD=B and OPTCD=H, cannot be specified in the DCB macro 
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instruction. They are requested in the DCB subparameter of 
a DD statement. Because all optional services requests 
must be supplied by the same source, the OPTCD operand must 
be omitted from the DCB macro instruction if either of 
these options is requested in a DD statement. The 
characters that can be specified (in any order, in one of 
the combinations shown above, and without commas between 
characters) are: 


Cc 











requests that chained scheduling be used. OPTCD=C 
cannot be specified if BFTEK=R is specified for the 

same data control block. Also, chained scheduling 

cannot be specified for associated data sets or 

eee on a 269 and is ignored for direct access 
evices 


Note: Except where it is not allowed, chained 
scheduling is used whether requested or not, For 
conditions uncer which eee ecneeusang is not 
allowed, see Data Iminist “4 ¢ lide. 








specifies that the first data byte in the output data 
line will be a 3800 table reference character. This 
table reference character selects a particular 
character arrangement table for the printing of the 
data line and can be used Singly or in conjunction 

! with ISO, ANSI, or machine control characters. This 

| option is valid only for the IBM 3800 Printing 

| Subsystem. For information on the table reference 
character and character any angemens table nocures! see 





requests that ISCII/ASCII tape records in an input 7 

data set be converted to EBCDIC code after the input i 
record has been read. Translation is done at CHECK ee 
time for input. It also requests that an output ee 
record in EBCDIC code be converted to ISCII/ASCII code 

before the record is written. For further information 

on this conversion, see “Variable- Length 

Records-~—Format D" in Data Admir ratio 





The Q option is unconditionally set by open routines 
if the data set is for a tape with ISO/ANSI/FIPS 
labels. For more information about ISCII/ASCII to 
eae or ae pe to eee rs Spee ene see 





requests the user totaling function. If this function 
is requested, the EXLST operand should specify the 
address of an exit list to be used. T cannot be 
specified for SYSIN and SYSOUT data sets. 


is specified only for a printer with the universal 
character set (CUCS) feature or the 3800 Printing 
Subsystem. This option unblocks data checks (permits 
them to be recognized as errors) and allows analysis 
by the appropriate error analysis routine CSYNAD exit 
routine). If the U option is omitted, data checks are 
not recognized as errors. 


For the IBM Mass Storage System (M55): U requests 
Window processing to reduce the amount of staging 
space required to process large sequential data sets 
on MSS. DBSORG must specify physical sequential, 
allocation must be in cylinders, and type of I/0 
accessing must be either INPUT only or OUTPUT only. 
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for DASD, specifies that the system is to perform a 
validity check on each record written on a direct 
access device. For buffered devices, specifies that 
device end interrupt is to be given only when a record 
is physically on the device. By specifying OPTCD=W 
with buffered devices, you do not benefit from the 
performance advantage of buffering. 





requests, for magnetic tape, input only, the system to 
shorten its normal error recovery procedure to 
consider a data check as a permanent I/0 error after 
five unsuccessful attempts to read a record. This 
option is available only if it has also been specified 
as a SYSGEN option. OPTCD=Z is meant to be used when 
a tape is Known to contain errors and there is no need 
to process every record. The error analysis routine 
CSYNAD) should keep a count of permanent errors and 
terminate processing if the number becomes excessive. 


Note: The following describes the optional services that 
can be requested in the DCB subparameter of a DD statement. 
If either of these options is requested, the complete OPTCD 
operand must be supplied in the DD statement. 








B 
If OPTCD=B is specified in the DCB subparameter of a 
DD statement, it forces the end-of-volume (CEOQV) 
routine to disregard the end-of-file recognition for 
magnetic tape. When this occurs, the EOV routine uses 
the number of volume serial numbers to determine end 
of file. 
H 
a If OPTCD=H is specified in the DCB subparameter of a 
( DD statement, it specifies that the DOS/0S interchange 
feature is being used with the data set. 


Source: The OPTCD operand can be supplied in the DCB macro 
instruction, in the DCB subparameter of a DD statement, in 
the data set label for direct access devices, or by the 
problem program before completion of the DCB open exit 
routine or JFCBE exit routine. However, all optional 
services must be requested from the same source. 


RECFM={{UCTILAIM]} 

a 

{DIBISIBSITAI} 

{FLIBIS|ITIBS]BTILA|M1}} 
The RECFM operand specifies the record format and 
characteristics of the data set being created or. processed. 
All the record formats shown above can be specified, but in 
those record formats that specify blocked records, the 
problem program must perform the blocking and deblocking 
of logical records; BSAM recognizes only data blocks. The 
following describes the characters that can be specified: 


A 
specifies that the records in the data set contain 
International Organization for Standardization (ISO) 
or American National Standards Institute CANSI) 
control characters. For a description of control 
hae i see Appendix E, “Control Characters" on 
page 


specifies that the data set contains blocked records. 


specifies that the data set contains variable-length 
ISCII/ASCII tape records. 
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specifies that the data set eentaine fixed-length aN 
records. | a, 


specifies that the records in the data set contain 
machine code control characters. For a description of 
control characters, see Appendix E, "Control 
Characters™ on page 208. RECFM=M cannot be used with 
ISCII/ASCII data sets. 


S specifies, for fixed-length records, that the 
records are to be written as standard blocks; with the 
exception of the last block or track in the data set, 
the data set contains no truncated blocks or unfilled 
tracks. Do not code § to retrieve records from a data 
set that was created using a RECFM other than 
standard. 


For variable-length records, including variable-length 
ISCII/ZASCII, S$ specifies that a record can span more 
than one block 


specifies that track overflow is used with the data 
set. Track overflow allows a record to be written 
partially on one track of a direct access device and 
the remainder of the record to be written on the 
following track or tracks as required. Chained 
scheduling cannot be requested if track overflow is 
used 


specifies that the data set contains undefined-length 
records. a 


Note: Format-U records are not supported for Version 
3 ISO/ANSI/FIPS tapes. An attempt to process a 
format-U record for a Version 3 tape results in a 
label validation installation exit being taken. 


Only ISO/ANSI Version 1 CISO 1001-1969 or ANSI 
X3.27-1969) format-U records can be used for input. 


specifies that the data set contains variable-length 
records. 


Notes: 


6 RECFM=V cannot be specified for a card reader data set 
or an ISO/ANSI/FIPS tape data set. 


@ RECFM=VBS does not provide the spanned record function; 
if this format is used, the problem program must block 
and segment the records. 


e RECFM=DBS or RECFM=DS does not provide the spanned 
record function; if this format is used, the problem 
program must block and segment the records. 


® RECFM=VS, VBS, DS, or DBS cannot be specified for a 
SYSIN data set. 


@ RECFM=V cannot be used for a 7- track tape unless the 
data conversion feature CTRTICH=C) is used. 


Source: The RECFM operand can be supplied in the DCB macro 
instruction, in the DCB subparameter of a DD statement, by 
the problem program before completion of the data control gf 
rae na routine, or by the data set label of an existing ty 

ata set. 
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SYNAD=relexp 
The SYNAD operand specifies the address of the error 
analysis (SYNAD) routine to be given control if an 
uncorrectable input/output error occurs. The contents of 
the registers when the error analysis routine is given 
control are described in Appendix A, "Status Information 
Following an Input/Output Operation" on page 190. 


The error analysis routine must not use the save area 
pointed to by register 13, because this area is used by the 
system. The system does not restore registers when it 
regains control from the error analysis routine. The error 
analysis routine can issue a RETURN macro instruction that 
uses the address in register 14¢ to return control to the 
system. If control is returned to the system, the system 
returns control to the problem program and proceeds as 
though no error had been encountered. 


If the SYNAD operand is omitted, the task is abnormally 
terminated when an uncorrectable input/output error occurs. 


Source: The SYNAD operand can be supplied in the DCB macro 
instruction or by the problem program. The problem program 
can also change the error routine address at any time. 


When operating a directly allocated 3800 Model 3 using 
all-points addressability, the SYNAD routine will be entered if 
Print Services Facility (PSF) detects an unrecoverable error. 
However, no error information is available to the SYNAD routine 
for a directly allocated 3800 Model 3. If you want to continue 
processing, you must close and reopen the data set to restart 
PSF. For more information on the 3800 Model 3, see 

j j ’ i for Models 3 and 8. 
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DCB-—CONSTRUCT A DATA CONTROL BLOCK (QISAM) 


The data control block for a queued indexed sequential access 
method (CQISAM) data set is constructed during assembly of the 
problem program. The DSORG and MACRF operands must be coded in 
the DCB macro instruction, but the other DCB operands can be 
supplied from other sources. Each QISAM DCB operand description 
contains a heading, "Source." The information under this 
heading describes the sources that can supply the operand to the 
data control block 


The DCB macro for QISAM is written: 


C[BFALN={F[D}1 
SIZE=absexp] 


»CYLOFL=absexp] 
[ » DDNAME=symbol 1]? 
, DSORG= Ete reu 

EODAD=relexp] 


absexp 
»MACRF={{(PM)} 
{(PL)} 
{(GME,S 
{(GLE, 
NTM= ; 


[, 
[,OPTCD= 
a »RECFM={ 
[, 


{ 
{ »PU] )}} 
ys CUICWILY]] 


Lt : 
IICL 
VIB] 

RKP=absexp] 

SYNAD=relexp] 





1 This parameter must be supplied before an OPEN macro is 
sehen for this DCB; it cannot be supplied in the open exit 
routine. 


The following describes the DCB operands that can be specified 
when a QISAM data set is being created or processed: 


BFALN={F|D} 
The BFALN operand specifies the alignment of each buffer in 
the buffer pool when the buffer pool is constructed 
automatically or by a GETPOOL macro instruction. If the 
BFALN operand is omitted, the system provides doubleword 
alignment for each buffer. The following describes the 
characters that can be specified: 


F | 
specifies that each buffer is ona fullword boundary 
that is not also a doubleword boundary. 


specifies that each buffer is on a doubleword 
boundary. 


If the BUILD macro instruction is used to construct the 
buffer pool, the problem program must provide a storage 
area for the buffers and control buffer alignment. 


Source: The BFALN operand can be supplied in the DCB macro 
instruction, in the DCB subparameter of a DD statement, or 
by the problem program before completion of the data 
control block exit routine. 


BLKSIZE=absexp Cmaximum value KEYLEN + BLKSIZE is 32760) 
The BLKSIZE operand specifies the length, in bytes, for 
each data block when fixed-length records are used, or it 
specifies the maximum length in bytes, for each data block 
when variable-length records are used. The BLKSIZE operand 
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must be specified when an ISAM data set is created. When 
a an existing ISAM data set is processed, the BLKSIZE operand 
( must be omitted (1t is supplied by the data set label). 


Track capacity of the direct access device being used must 
be considered when the block size for an ISAM data set is 
specified. For fixed-length records, the sum of the key 
length, data length, and device overhead plus 10 bytes (for 
ISAM use) must not exceed the capacity of a single track on 
the direct access device being used. For variable-length 
records, the sum of the key length, block-descriptor word 
length, record-descriptor word length, data length, and 
device overhead plus 10 bytes (for ISAM use) must not 
exceed the capacity of a single track on the direct access 
device being used. Device capacity and device overhead are 
described in Appendix C, "Device Capacities" on page 203 
For additional information about device capacity and space 
allocation, see ini j i F 


If fixed-length records are used, the value specified in 
the BLKSIZE operand must be an integral multiple of the 
value specified in the LRECL operand. 


Source: When an ISAM data set is created, the BLKSIZE 
operand can be supplied in the DCB macro instruction, in 
the DCB subparameter of a DD statement, or by the problem 
program before completion of the data control block exit 
routine. When an existing ISAM data set is processed, the 
BLKSIZE operand must be omitted from the other sources, 
allowing the data set label to supply the value. 


BUFCB=relexp 

The BUFCB operand specifies the address of the buffer pool 
control block constructed by a BUILD macro instruction. 

If the system constructs the buffer pool automatically or 

if the buffer pool is constructed by a GETPOOL macro 

instruction, the system places the address of the buffer 

pool control block into the data control block, and the 

BUFCB operand should be omitted. 


Source: The BUFCB operand can be supplied in the DCB macro 
instruction or by the problem program before completion of 
the data control block exit routine. 


BUFL=absexp (maximum value is 32760) 
The BUFL operand specifies the length, in bytes, of each 
buffer in the buffer pool when the buffer pool is 
constructed by a BUILD or GETPOOL macro instruction. When 
the data set 1s opened, the system computes the minimum 
buffer length required and verifies that the length in the 
buffer pool control block is equal to or greater than the 
minimum length required. The system then inserts the 
computed length into the data control block. 


The BUFL operand is not required for QISAM if the system 
acquires buffers automatically; the system computes the 
minimum buffer length required and inserts the value into 
the data control block. 


If the buffer pool is constructed with a BUILD or GETPOOL 
macro instruction, additional space is required in each 
buffer for system use. For a description of the buffer 
length required for various ISAM operations, see 


Source: The BUFL operand can be supplied in the DCB macro 
instruction, in the DCB subparameter of a DD statement, or 
by the problem program before completion of the data 
control block exit routine. 


BUFNO=absexp (maximum value is 255) 


The BUFNO operand specifies the number of buffers to be 
constructed by a BUILD macro instruction, or it specifies 
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the number of buffers to be acquired automatically by the 
system. If the BUFNO operand is omitted, the system 
automatically acquires two buffers. 





If the GETPOOL macro instruction is used to construct the 
buffer pool, the BUFNO operand is not required. 


Source: The BUFNO operand can be supplied in the DCB macro 
instruction, in the DCB subparameter of a DD statement, or 
by the problem program before completion of the data 
control block exit routine. 


CYLOFL=absexp (maximum value is number of tracks minus 1) 
The CYLOFL operand specifies the number of tracks on each 
cylinder that is reserved as an overflow area. The 
overflow area is used to contain records that are forced 
off prime area tracks when additional records are added to 
the prime area track in ascending key sequence. ISAM 
maintains pointers to records in the overflow area so that 
the entire data set is logically in ascending key sequence. 
Tracks in the cylinder overflow area are used by the system 
only if OPTCD=Y is specified. For a more complete 
description of cylinder overflow area, _refer to the space 
allocation section of j 


Source: When an ISAM data set is created, the CYLOFL 
operand can be supplied in the DCB macro instruction, in 
the DCB subparameter of a DD statement, or by the problem 
program before completion of the data control block exit 
routine. When an existing ISAM data set is processed, the 
CYLOFL operand should be omitted, allowing the data set 
label to supply the operand. 


DDNAME= 
The DDNAME operand epeciries the name used to identify the 
job control language data definition (DD) statement that 
defines the data set being created or processed. 


Source: The DDNAME operand can be supplied in the DCB 
macro instruction or by the problem program before an OPEN 
macro instruction is issued to open the data set. 


DSORG={IS| ISU} 
The DSORG operand specifies the organization of the data 
set and indicates if the data set contains any 
location-dependent information that would make it 
unmovable. The following characters can be specified: 


Is | 
specifies an indexed sequential data set organization. 


ISu 
specifies an indexed sequential data set that contains 
location-dependent information. ISU can be specified 
only when an ISAM data set is created. 


Source: The DSORG operand must be specified in the DCB 
macro instruction. When an ISAM data set is created, 

= or ISU must also be specified in the DCB 
subparameter of the corresponding DD statement. 


EODAD= 
The EODAD operand specifies the address of the routine to 
be given control when the end of an input data set is 
reached. For ISAM, this operand would apply only to scan 
mode when a data set is open for an input operation. 
Control is given to this routine when a GET macro 
instruction is issued and there are no more input records 
to retrieve. For additional information on the EODAD 
routine, see in] j j é 





Source: The EODAD operand can be supplied in the DCB macro 
instruction or by the problem program before the end of the 
data set is reached. 
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EXLST=relexp 
— The EXLST operand specifies the address of the problem 
- program exit list. The EXLST operand 1s required only if 
the problem program uses the data control block exit 
routine for additional processing. 


For the format and requirements for exit list processing, 
see Appendix D, "DCB Exit List Format and Contents™ on 
page 206. For addi tional a Onna ezen about exit list 
processing, see Data Administ Guide. 





Source: The EXLST operand can be supplied in the DCB macro 
instruction or by the problem program before the associated 
exit is required. 


KEYLEN=absexp (maximum value is 255) 
The KEYLEN operand specifies the length, in bytes, of the 
key associated with each record in an indexed sequential 
data set. When blocked records are used, the key of the 
last record in the block Chighest key) is used to identify 
the block. However, each logical record within the block 
has its own identifying key that ISAM uses to access a 
Siven logical record 


Source: When an ISAM data set is created, the KEYLEN 
operand can be supplied in the DCB macro instruction, in 
the DCB subparameter of a DD statement, or by the problem 
program before completion of the data control block exit 
routine. When an existing ISAM data set is processed, the 
KEYLEN operand must be omitted, allowing the data set level 
to supply the key length value. KEYLEN=0 is not valid for 
an ISAM data set. 


LRECL=absexp (maximum value is device- dependent) 
The LRECL operand specifies the length, in bytes, for 
— fixed~length records, or it specifies the maximum length, 

( in bytes, for variable-length records. The value specified 
in the LRECL operand cannot exceed the value specified in 
the BLKSIZE operand. When fixed, unblocked records are 
used and the relative key position (Cas specified in the RKP 
operand) is zero, the value specified in the LRECL operand 
should include only the data length (the key is not written 
as part of the fixed, unblocked record when RKP=0). 


The track capacity of the direct access device being used 
must be considered if maximum-length logical records are 
being used. For fixed-length records, the sum of the key 
length, data length, and device overhead plus 10 bytes (for 
ISAM use) must not exceed the capacity of a single track on 
the direct access device being used. For variable-length 
records, the sum of the key length, data length, device 
overhead, block-descriptor-word length, and 
record-descriptor-word length plus 10 bytes (for ISAM use) 
must not exceed the capacity of a single track on the 
direct access device being used. Device capacities are 
shown in Appendix C, "Device Capacities™ on page 203. >For 
additional information about device cae and space 
allocation, see dministrat) Guide. 





Source: When an ISAM data set is created, the LRECL operand 
can be supplied in the DCB macro instruction, in the DCB 
subparameter of a DD statement, or by the problem program 
before completion of the data control block exit routine. 
When an existing ISAM data set is processed, the LRECL 
operand must be omitted, allowing the data set label to 
supply the value. 


MACRE= Srerise 


i} 
C(GME,SCK{[I}7)3 
C(GLI,S£K/IF1L,PU])}3 
The MACRF cperand specifies the type of macro instructions, 
the transmittal mode, and type of search to be used with 
the data set being processed. The operand can be coded in 
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any of the combinations shown above; the following 
describes the characters that can be coded. fo 


The following characters can be specified only when the ue 
data set is being created (load mode) or additional records 
are being added to the end of the data set (resume load): 


PL 
specifies that PUT macro instructions are used in the 
locate transmittal mode; the system provides the 
problem program with the address of a buffer 
containing the data to be written into the data set. 
PM 


specifies that PUT macro instructions are used in the 
move transmittal mode; the system moves the data to be 
written from the problem program work area to the 
buffer being used. 


The following characters can be specified only when the 
data set is being processed (scan mode) or when records in 
an ISAM data set are being updated in place: 


GL 
specifies that GET macro instructions are used in the 
locate transmittal mode; the system provides the 
problem program with the address of a buffer 
containing the logical record read. 

GM 
specifies that GET macro instructions are used in the 
move mode; the system moves the logical record from 
the buffer to the problem program work area. 

I | 
specifies that actual device addresses (MBBCCHHR) are a hers 
used to search for a record (or the first record) to 
be read 

K | 
specifies that a key or key class is used to search 
for a record Cor the first record) to be read 

PU 
specifies that PUTX macro instructions are to be used 
to return updated records to the data set. 

S 


specifies that SETL macro instructions are used to set 
the beginning location for processing the data set. 


Source: The MACRF operand must be coded in the DCB 
macro instruction. 


NTM=absexp (maximum value is 99) 
The NTM operand specifies the number of tracks to be 
created in a cylinder index before a higher-level index is 
created. If the cylinder index exceeds this number, a 
master index 1s created by the system; if a master index 
exceeds this number, the next level of master index is 
created. The system creates as many as three levels of 
master indexes. The NTM operand is ignored unless the 
master index option (COPTCD=M) is selected. 


Source: When an ISAM data set is being created, the NTM 
operand can be supplied in the DCB macro instruction, in 
the DCB subparameter of a DD statement, or by the problem 
program before completion of the data control block exit 
routine. When an ISAM data set is being processed, master 
index information is supplied to the data control block 
ee data set label, and the NTM operand must be 
omitted. 
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OPTCD=[I]JLLICEMILRICUICWICYI 
Fy, The OPTCD operand specifies the optional services performed 
( by the system when an ISAM data set is being created or 
updated. The following describes the characters that can 
be specified (these characters can be specified in any 
order, and no commas are ailowed between characters): 


I 
specifies that the system uses the independent 
overflow areas to contain overflow records. Note that 
it is only the use of the allocated independent 
overflow area that is optional. Under certain 
conditions, the system designates an overflow area 
that was not allocated for independent overflow by the 
problem program. See a rar ie eEace for an Indexed 
Sequential Data Set™ in Data imini: ation Guide. 





specifies that the data set will contain records 
flagged for deletion. A record is flagged for 
deletion by placing a hexadecimal value of "FF' in the 
first data byte. Records flagged for deletion remain 
in the data set until the space is required for 
another record to be added to the track and are 
ignored during sequential retrieval of the ISAM data 
set (QISAM, scan mode). This option cannot be 
specified for blocked fixed-length records if the 
relative key position is 0 (RKP=0), or it cannot be 
specified for variable-length records if the relative 
key position is 4 (RKP=4). 





When an ISAM data set is being processed with BISAM, a 
record with a duplicate key can be added to the data 
set (WRITE KN macro instruction), only when OPTCD=L 
has been specified and the original record (the one 
( whose key is being duplicated) has been flagged for 





deletion. 


specifies that the system create and maintain a master 
indexCes) according to the number of tracks specified 
in the NTM operand. 


specifies that the system place reorganization 
statistics in the DCBRORG1, DCBRORG2, and DCBRORG3 
fields of the data control block. The probiem program 
can analyze these statistics to determine when to 
reorganize the data set. If the OPTCD operand is 
omitted, the reorganization statistics are 
automatically provided. However, if the OPTCD operand 
is supplied, OPTCD=R must be specified to obtain the 
reorganization statistics. 


specifies that the system is to accumulate track index 
entries in storage and write them as a group for each 
track of the track index. OPTCD=U can be specified 
only for fixed-length records. The entries are 
written in fixed-length unblocked format. 


specifies that the system is to perform a validity 
check on each record written. 


specifies that the system is to use the cylinder 
overflow area(s) to contain overflow records. If 
OPTCB=Y is specified, the CYLOFL operand specifies the 
number of tracks to be used for the cylinder overflow 
area. The reserved cylinder overflow area is not used 
unless OPTCD=Y is specified. 
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Source: ‘When an ISAM data set is created, the OPTCD 


operand can be supplied in the DCB macro instruction, in _ aa 
the DCB subparameter of a DD statement, or by the problem ( 
program before an OPEN macro instruction is issued to open XY 


the data set. However, all optional services must be 
requested from the same source. When an existing ISAM data 
set is processed, the optional service information is 
supplied to the data control block from the data set label, 
and the OPTCD operand: should be omitted. 


RECFM={VIB] | FLB1) 


RECFM operand epacitiad the format and characteristics 
of the records in the data set. If the RECFM operand is 
omitted, variable-length records Cunblocked) are assumed. 
The following describes the characters that can be 


specified: 
specifies that the data set contains blocked records. 
2 | 
specifies that the data set contains fixed-length 
records. 
V 


specifies that the data set contains variable-length 
records. | 


Source: When an ISAM data set is created: the RECFM 
operand can be supplied in the DCB macro instruction, in 
the DCB subparameter of a DD statement, or by the problem 
program before an OPEN macro instruction is issued to open 
the data set. When an existing ISAM data set is processed, 
the record format information is supplied by the data set 


label; and the RECFM operand should be omitted. 


If the record format information is supplied in the DD : 
statement or the DCB, it must agree with the information in Wen. bt 
the data set label. 


RKP=absexp 


The RKP operand specifies the relative position of eve 
first byte of the key within each logical record. Fo 
example, if RKP=9 is specified, the key starts in the "10th 
byte of the record. The delete option COPTCD=L) should not 
be specified if the relative key position is the first byte 
of a blocked fixed-length record or the fifth byte of a 
variable-length record. If the RKP operand is omitted, 
RKP=0 is assumed. ; 


If unblocked fixed-length records with RKP=0 are used, the 
key is not written as'a part of the data record, and the 
delete option can be specified. If blocked fixed-length 
records are used, the key is written as part of each data’ 
record; either RKP must be Greater than zero or the delete 
eperen must not be used. , 


If variable=leneth records: (blocked or unblocked) are used, 
and if the delete option is not specified, RKP must be 4 or 
greater; if the delete option is specified, RKP must be 
specified as 5 or greater. The 4 additional bytes allow 
for the block descriptor word in variable-length records. 


Source: When an ISAM data set is created, the RKP operand 

can be supplied in the DCB macro instruction, in the DCB 
subparameter of a DD statement, or by the problem program 

before completion of the data control block exit routine. 

When an existing ISAM data set is processed, the RKP 

information is supplied by the data set label and the RKP 

operand should be omitted. on 
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SYNAD= 


The SYNAD operand specifies the address of the error 
analysis routine given control when an uncorrectable 
input/output error occurs. The contents of the registers 
when the error analysis routine is given control are 
described in Appendix A, "Status Information Following an 
Input/Output Operation" on page 190. 


The error analysis routine must not use the Save area 
pointed to by register 13, because this area is used by the 
system. The system does not restore registers when it 
regains control from the error analysis routine. The error 
analysis routine can issue a RETURN macro instruction that 
uses the address in register 14 to return control to the 
system. When control is returned in this manner, the 
system returns control to the problem program and proceeds 
as though no error had been encountered; if the error 
analysis routine continues processing, the results may be 
unpredictable. 


For additional information on error analysis routine 
processing for indexed sequential data sets, see Data 


Source: The SYNAD operand can be supplied in the DCB macro 

instruction or by the problem program. The problem program 
rea also change the error analysis routine address at any 
ime. 
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DCB-—CONSTRUCT A DATA CONTROL BLOCK (QSAM) a 


The data control block for the queued sequential access method aed 
€QSAM) is constructed during assembly of the problem program. re 
The DSORG and MACRF operands must be coded in the DCB macro 

instruction, but the other DCB operands can be supplied to the 

data control block from other sources. Each DCB operand 

description contains a heading, "Source." The information under 

ee ae describes the sources from which the operand can be 
supplied. 


For information on additional operands for the DCB macro for the 
IBM 3890 Document Processor, see 
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The DCB macro for QSAM is written: 


[symbol] [BFALN={F|D}] 
[»>BFTEK={S|A}] 
[,BLKSIZE=absexp] 
[,BUFCB=relexp] 
[,BUFL=absexp] 
[, BUFNO=absexp] 

[, BUFOFF= {absexp|L}] 

[» DDNAME=symbol ]? 

[> DEVD={{DA} 

{TA 


[,»DEN={1]/2]| 
[> TRTCH={C] 


PR 

[,PRTSP={0] 
PC 

[,MODE=[C| 


STACK={ 
FUNC= ah 


] 
|T31} 


1331} 


hm mG 


CXTIIR 
RWPIXT it 


[RI] 


CXTIIR [D] 
RWPLEXT 11W 


4} 
ET 
2 
R 
] 
W 


25 
= U—im 


MODE=[ 
STACK= 
[,FUNC= a 


,DSORG={PS|PSU} - 
[,EODAD=relexp] 
[»EROPT= TACC|SKP ABE? } 
[,EXLST= 


[ 
[> } 
[, P 
] 

{RD 
[, [ 
[; } 
p 
] 


eee 
=O —imT 
a—Me 4q—ne 
— = = O 


TICAIMI} 
AIM1}}1 


fag 
WWWISCHOOQOON+0O WS20 
exe PE GE Read Mend Eee andl Red Bend bene teed Sigal canons armen ing 





1 This parameter must be supplied before an OPEN macro is 
issued for this DCB; it cannot be supplied in the open exit 
routine. 


The following describes the operands that can be specified in 
the DCB macro instruction for a QSAM data set: 


BFALN={F/D} 
The BFALN operand specifies the boundary alignment of each 
buffer in the buffer pool when the buffer pool is 
constructed automatically or by a GETPOOL macro 
instruction. If the BFALN operand is omitted, the system 
provides doubleword alignment for each buffer. 


If the data set being created or processed contains 
ISCII/ASCII tape records with a block prefix, the block 
prefix is entered at the beginning of the buffer, and data 
alignment depends on the length of the block prefix. For a 
description of how to specify the block prefix length, 
refer to the description of the BUFOFF operand. 
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The following describes the characters that can be 
speci fied: 


FE 





specifies that each buffer is on a fullword boundary 
that is not also a doubleword boundary. 


specifies that each buffer is on a doubleword 
boundary. 


If the BUILD macro instruction is used to construct the 
buffer pool, the problem program must control buffer 
alignment. 


Source: The BFALN operand can be supplied in the DCB macro 
instruction, in the DCB subparameter of a DD statement, or 
by the problem program before completion of the data 
control block exit routine. If both the BFALN and BFTEK 
operands are specified, they must be supplied from the same 
source. 


BFTEK={S$]|A}. 
The BFTEK operand specifies the buffering technique that is 
used when the QSAM data set is created or processed. 
the BFTEK operand is omitted, simple buffering is assumed. 
The following describes the characters that can be 
specified: 


E} 


specifies that simple buffering is used. 


A 
specifies that a logical record interface is used for 
variable-length spanned records. When BFTEK=A is 
specified, the open routine acquires a record area 
equal to the length specified in the LRECL field plus 
32 additional bytes for control information. LRECL=0 
1S invalid. The LRECL provided at open should be the 
maximum length in bytes. The open routine uses this 
value to acquire the record area. When a logical 
record interface is requested, the system uses the 
Simple buffering technique. 


BFTEK=A is invalid with MOVE mode. 


To use the simple technique efficiently, the user should be 
familiar with the three transmittal modes for QSAM and the 
buffering techniques described in Data Administration 


Source: The BFTEK operand can be supplied in the DCB macro 
instruction, in the DCB subparameter of a DD statement, or 
by the problem program before completion of the data 
control block exit routine. If both the BFTEK and BFALN 
operands are specified, they must be supplied from the same 
source. 


BLKSIZE=absexp(maximum value is 32760 for IBM standard labels) 
The BLKSIZE operand specifies the length, in bytes, of a 
data block for fixed-length records, or it specifies the 
maximum length, in bytes, of a data block for 
variable-length or undefined-length records. 


The actual value that can be specified in the BLKSIZE 
operand depends on the device type and record format being 
used. Device capacities are shown in Appendix C, "Device 
Capacities" on page 203. (For additional information about 
device capacity, refer to inj j j me 





For direct access devices when track overflow is used or 
variable-length spanned records are being processed, the 
BLKSIZE operand can be up to the maximum value. For other 
record formats used with direct access devices, the value 
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specified in the BLKSIZE operand cannot exceed the capacity 
C of a single track 


Because QSAM provides a logical record interface, the | 
device capacities shown in Appendix C, "Device Capacities" 
en page 203, also apply to a maximum-length logical record. 
One exception to the device capacity for a logical record 
is the size of variable-length spanned records. Their 
length can exceed the value specified in the BLKSIZE 
eperand (see the description of the LRECL operand). 


the BLKSIZE operand must be an integral multiple of, the 
value specified in the LRECL operand. If the records are 
unblocked fixed~length records, the value specified in the 
BLKSIZE operand must equal the value specified in the LRECL 
operand if the LRECL operand is specified. 


| If fixed-length records are used, the value specified in 


If variable-length records are used, the value specified in 
the BLKSIZE operand must include the data length Cup to 
32756 bytes) plus 4 bytes required for the block descriptor 
word (BDW). Fer format-D variable-length records, the 7 
minimum BLKSIZE is 18 bytes. The maximum is 2048 bytes. 
con more ee eo about the BLKSIZE restrictions, see 








If ISCII/ASCII tape records with a block prefix are 
processed, the vaiue specified in the BLKSIZE operand must 
also include the length af the block prefix. If an 
ISCII/“ASCII format DB or DBS tape data set is opened for 
output using 9SAM with the system acquiring the buffers and 
BUFOFF=0 specified, the value specified in the BELKSIZE 
operand must be increased by 4 to allow for a G-byte QSAM 
internal processing area. If BUFL is specified, the BUFL 
operand value must be increased by %, instead of the 

( : BLKSIZE operand value. 





Lf variable-length spanned records are used, the value 
specified in the BLKSIZE operand can be the best one for 
the device being used or the processing being done. When 
unit record devices (card or printer) are used, the system 
assumes records are unblocked; the value specified for the 
BLKSIZE operand is equivalent to one print line or one 
card. A legical record that spans several blocks is 
written one segment at a time. 


If undefined-length records are used, the problem program 
can insert the actual record length into the BCELREC. 
field. See the description of the LRECL operand. 


Sources The BLKSIZE operand can be supplied in the DCB 
macro instruction, in the DCB subparameter of a DD 
statement, by the problem program before completien of the 

* data control block exit routine, or by the data set label 
of an existing data set. 


Note: The maximum bleck size for Version 3 ISO/ANSI/FIPS 
tapes CISG 1001-1979 or ANSI X3.27 1978) is 2048 bytes. An 
attempt to exceed 2048 bytes for a Version 3 tape results 
in a label validation installation exit being taken. 


BUFCB=relexp 
The BUFCB operand specifies the address of the buffer pool 
control block constructed by a BUILD or BUILBRCD macro 
instruction. 


If the buffer pool is constructed automatically or by a 
GETPOOL macro instruction, the system places the address of 
the buffer pool contrel block into the data control block, 
and the BUFCB cperand should be omitted. 





Sources The BUFCB operand can be supplied in the DCB macro 
instruction or by the problem program before completion of 
the data control block exit routine. 


Macro Instruction Descriptions 75 

















DCE (QSAM) 








sexp (maximum value is 32760) 

the BUFL operand specifies the length, in bytes, of each 
buffer in the buffer pool when the buffer pool is acquired 
automatically. If the BUFL operand is omitted, the system 
acquires buffers with a length equal to the value specified 
ian the BLKSIZE operand; if the problem program requires 
larger buffers, the BUFL operand is required. If the data 
set is for card image mode, the BUFL operand is specified 
as 160 bytes. The description of the DEVD operand contains 
a description of card image mode. 


If the data set contains ISCII/ASCII tape records with a 
block prefix, the value specified in the BUFL operand must 
also include the length of the block prefix. If an 
ISCII/ASCII format DB or DBS tape data set is scpened for 
output using QSAM and if BUFOFF=0 is specified, then the 
BUFL operand value, if specified, must be increased by 4 to 
allow for a 4-byte QSAM internal processing area. 


If the buffer pool is constructed by a BUILD, BUILDRCD, or 
eee instruction, the BUFL operand is not) 
required. 


Source: The BUFL operand can be supplied in the DCB macro 
instruction, in the DCB subparameter of a DD statement, or 
by the problem program before completion of the data 
control block exit routine. 


BUFNO=absexp Cmaximum value is 255) 


The BUFNG operand specifies the number of buffers in the 
buffer pool constructed by a BUILD or BUILDRCD macro 
anstruction, or it specifies the number of buffers to be 
acquired automatically. If chained scheduling is 
specified, the value of BUFNO determines the maximum number 
of channel program segments that can be chained and must be 
specified as more than one. If the BUFNO operand is 
omitted and the buffers are acquired automatically, the 
system acquires three buffers if the device is a 2540 
device or five buffers for any other device type. 


If the buffer pool is constructed by a GETPOOL macro 
instruction, the BUFNOG operand is not required. 


Sources The BUFNO operand can be supplied in the DCB macro 
instruction, in the DCB subparameter of a DD statement, or 
by the problem program before completion of the data 
control block exit routine. 


BUFOFF={absexp 


iL} = 
The BUPFOFF operand specifies the length, in bytes, of the 
block prefix used with ISCII/ASCII tape data sets. When 
QSAM xs used te read ISCII/ASCII tape records, only the 
data portion Cor its address) is passed to the problem 
program; the block prefix is not available to the problem 
program. Block prefixes Cexcept BUFOFF=L) cannot be 
included in QSAM output records. The following can be 
specified in the BUFGFF operand: 





specifies the length, in bytes, of the block prefix. 
This value can be from 0 te 99 for an input data set. 
The value must be 0 for writing an output data set 
with fixed-length or undefined-length records. 


specifies that the block prefix is 4 bytes long and 
contains the block length. BUFOFFSL is used when 
format-D records CISCII/ASCII) are processed. QQSAM 
uses the @ bytes as a block-descriptor word (BDW). 
For further information on this operand, see 

por sees Lene Becoras 7 OOmat D® in g 
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Source: The BUFOFF operand can be supplied in the DCS 
macro instruction, in the DCB subparameter of a BD 
statement, or by the problem program befcre an GPEN macre 
instruction is issued to open the data set. BUFOFF-absexp 
can also be supplied by the second system label of an 
existing data set; BUFOFF=L cannot be supplied by the label 
of an existing data set. 


DDNAME=symbol] 


The DDNAME operand specifies the name used to identify the 
job control language data definition (DD) statement that 
defines the data set being created or processed 


Source: The DDNAME operand can be supplied in the DCB 
macro instruction or by the problem program before an GPEN 
macro instruction is issued to open the data set. 


DEVD={DA|TAIPRIPCIRD} f,options] 


The DEVD operand specifies the device type where the data 
set can or does reside. The device types above are shown 
with the optional operand(s) that can be coded when a 
particular device is used. The devices are listed in order 
of device independence. For example, if DEVD=DA is coded 
in a DCB macro instruction Cor the DEVD operand is omitted, 
which causes a default te BDA), the data control block 
constructed during assembly could later be used for any of 
the other devices, but, if BEVB=RD is coded, the data 
control block can be used only with a card reader or card 
reader punch. Unless you are certain that device 
interchangeability is not reaguired, you should either code 
DEVD=DA or omit the operand and allow it to default to BA. 


If system input 1s directed to an intermediate storage 
device, the DEVD operand is omitted, and the job control 
language for the problem program must designate the system 
input to be used. Similarly, if system output is directed 
to an intermediate storage device, the BEVD operand is 
omitted, and the job control language for the problem 
program must designate the system output to be used. If 
DEVD=PR, PC, or RD is coded, the DCB macro should not be 
coded within the first 16 bytes of addressability for the 
control section. 


The DEVD ocperand is discussed below according te individual 
device type: 


DEVD=DA 
specifies that the data control block can be used for 
a direct access device for any of the other device 
types described following DA). 


DEVD=TA 
LC» DEN={1/2/3/43) 
[> TRICH={CIEIETIT}2 
specifies that the data control block can be used for 
a magnetic tape data set for any of the other device 
types described following TA). If TA is escded;, the 
following opticnal operands can be coded: 


DEN={112/3/4) 
The DEN operand specifies the recording density 
in the number of bits~-per~-inch per track as shewn 
in the following: 


Recording Density 


DEN 7-Track GaT pack L8-Track 
l 556 N/A N/A 
2 &00 800 (NRZI)D4 NZA 
3 N/A 1600 €PE)= N/A 
q N/A 6250 (GCR)4 N/A 
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i NRZI is for nonreturn-to-zero inverted mode. 


2 PE is for phase encoded mode. i i 


7 . ed 
3 GCR is for group coded recording mode. 


TRICH={CIELETIT} 
The TRTICH operand specifies the recording 
technique for /7-track tape. One of the above 
character combinations can be coded. If the 
TRTCH operand is omitted, odd parity with no 
translation or conversion is assumed. The 
following describes the characters that can be 
specified: 
Cc 
specifies that the data-conversion feature 
is used with odd parity and no translation. 


E 
specifies even parity with no translation or 
conversion. 

ET 
specifies even parity with BCDIC to EBCDIC 
translation required, but no data-conversion 
feature. 

T 


specifies that BCDIC to EBCDIC translation 
is required with odd parity and no 
data~conversion feature. 


DEVD=PR 
C»>PRTSP={0]1]2/3}1 
Specifies that the data control block is used for an 
on-line printer Cor any of the other device types 
following PR). If PR is coded, the following optional 
operand can be coded: 


PRTSP={0/1/2/3) 
The PRTSP operand specifies the line spacing on 
the printer. This operand is not valid if the 
RECFM operand specifies either machine CRECFM=M), 
ANSI CRECFM=A), or ISO control characters. If 
the PRTSP operand is not specified from any | 
source, one 1s assumed. The following describes 
the characters that can be specified: 


0 
specifies that Spacing 18 suppressed (no 
space). 

a ae 
specifies single spacing. 

2 , 
specifies double spacing Cone blank line 
between printed lines). 

3 


specifies triple spacing (two blank lines 
between printed lines). 


Note: MODE and FUNC subparameters cannot be 
used with this specification. 


DEVD=PC 
[ MODE=[CIEIER13 
[,»STACK={112}] 
C»>FUNC={IIP | PWEIXTIIRIRPIDI|RWETIE RWPEIXTICDI IWitTi}] 
specifies that the data control block is used for a 
card punch Cor any of the other device types following 
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PC). If PC is coded, the following optional operands 
can be specified: 


MODE=[CIEI]{£R]I] 
The MODE operand specifies the mode of operation 
for the card punch. If the MODE operand is 
omitted, E is assumed. The following describes 
the characters that can be specified: 


Cc 





specifies that the cards are to be punched 
in card image mode. In card image mode, the 
12 rows in each card column are punched from 
two consecutive bytes of virtual storage. 
Rows 12 through 3 are punched from the 6 
low-order bits of one byte, and rows 4 
through 9 are punched from the 6 low-order 
bits of the following byte. 


specifies that cards are to be punched in 
EBCDIC code. 


STACK={]]| 2} 
The STACK operand specifies the stacker bin where 
the card is placed after punching is completed. 
If this operand 1s omitted, stacker number 1 is 
used. The following describes the characters 
that can be specified: 


i 


specifies stacker number 1. 


2 
specifies stacker number 2. 


pie, FUNC={I(P/PWEXTI|RIRPCD]|RWETI[RWPEXTICDI|WETI} 

( The FUNC operand defines the type of 3525 card 
punch data sets that is to be used. If the FUNC 
operand is omitted from all sources, a data set 
opened for input defaults to read only, and a 
data set opened for output defaults to punch 
only. The following describes the characters 
that can be specified in the FUNC operand: 


D 
specifies that the data protection option is 
to be used. The data protection option 
prevents punching information into card 
columns that already contain data. When the 
data protection option is used, an 80-byte 
data protection image (DPI) must have been 
previously stored in SYS]1.IMAGELIB. Data 
protection applies only to the output punch 
portion of a read and punch or read, punch, 
and print operation. 


specifies that the data in the data set is 

to be punched into cards and printed on the 
cards; the first 64 characters are printed 

on line l of the card and the remaining 16 

characters are printed on line 3 


specifies that the data set is for punching 
cards. See the description of the character 
X for associated punch and print data sets. 


— specifies that the data set is for reading 
( cards. 
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specifies that the two-line option is used. 

The two-line print option allows two lines 
of data to be printed on the card (lines 1 
and 3). If T is not specified, the 
multiline print option is used; this allows 
printing on all 25 possible print lines. In 
either case, the data printed may be the 
same as the data punched in the card, or it 
may be entirely different data. 


specifies that the data set is for printing. 
See the description of the character X for 
associated punch and print data sets. 


specifies that an associated data set is 
opened for output for both punching and 
printing. Coding the character X is used to 
distinguish the 3525 printer output data set 
from the 3525 punch output data set. 


Note: If data protection is specified, the data 
protection image (DPI) must be specified in the 
FCB subparameter of the DD statement for the data 


set. 
DEVD=RD 
{»MODE=[CiEI]CO|R]1 
[»,STACK={1]2}] 
[>FUNC={I/]P/PWEIXT] |] RIRPID]|]RWEITI|]RWPLEXTICDI WET} 1 
RD 


specifies that the data control block is used with a 
card reader or card read punch. If RD is specified, 
the data control block cannot be used with any other 
device type. When RD is coded, the following optional 
operands can be specified: 


MODE=[CIEILCO|R] 
The MODE operand specifies the mode of operation 
for the card reader. The following describes the 
characters that can be specified: 


Cc 
specifies that the cards to be read are in 
card image mode. In card image mode, the 12 
rows of each card column are read into two 
consecutive bytes of virtual storage. Rows 
12 through 3 are read into the 6 low-order 
bits of one byte, and rows 4 through 9 are 
read into the 6 low-order bits of the 
following byte. 


specifies that the cards to be read contain 
data in EBCDIC code. 


specifies that the program runs in optical 
mark read mode (3505 card reader). 


specifies that the program runs in 
read-column-eliminate mode (3505 card reader 
and 3525 card punch, read feature). 


Note: If the MODE operand for a 3505 or 3525 is 
specified in the DCB subparameter of a DD 
statement, either C or E must be specified if R 
or O is specified. 


ec 
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STACK={1]12} 
The STACK operand specifies the stacker bin into 
which the card is placed after reading is 
completed. If this operand is omitted, stacker 
number 1 is used. The following describes the 
characters that can be specified: 


i 


2 


specifies stacker number 1. 


specifies stacker number 2. 


FUNC= Se ee er eee ee age 


FUNC operand defines the type of 3525 card 


punch data sets that are used. If the FUNC 
operand is omitted from all sources, a data set 
opened for input defaults to read only, and a 


data 


only. 


that 
D 


set opened for output defaults to punch 
The following describes the characters 
can be specified in the FUNC operand: 


specifies that the data protection option is 
to be used. The data protection option 
prevents punching information into card 
columns that already contain data. When the 
data protection option is used, an 80-byte 
data protection image (DPI) must have been 
previously stored in SYS].IMAGELIB. Data 
protection applies only to the output punch 
portion of a read and punch or read, punch, 
and print operation. 


specifies that the data in the data set is 

to be punched into cards and printed on the 
cards; the first 64 characters are printed 

on line 1 of the card and the remaining 16 

characters are printed on line 3 


specifies that the data set is for punching 
cards. See the description of the character 
X for associated punch and print data sets. 


specifies that the data set is for reading 
cards. 


specifies that the two-line option is used. 
The two-line print option allows two lines 
of data to be printed on the card Clines l 
and 3). If T is not specified, the 
multiline print option is used; this allows 
Printing on all 25 possible print lines. In 
either case, the data printed may be the 
same as the data punched in the card, or it 
may be entirely different data. 


specifies that the data set is for printing. 
See the description of the character X for 
associated punch and print data sets. 


specifies that an associated data set is 
opened for output for both punching and 
printing. Coding the character X is used to 
distinguish the 3525 printer output data set 
from the 3525 punch output data set. 
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Note: If data protection is specified, the 
data protection image (DPI) must be 
specified in the FCB subparameter of the DD 
statement for the data set. 


Source: The DEVD operand can be supplied only in 
the DCB macro instruction. However, the optional 
operands can be supplied in the DCB macro 
instruction, the DCB subparameter of a DD 
statement, or by the problem program before 
completion of the data control block exit 
routine. 


DSORG={PS | PSU} 


The DSORG operand specifies the organization of the data 
set and indicates if the data set contains any 
location-dependent information that would make it 
ane The following can be specified in the DSORG 
operand: | 


PS 
Specifies a physical sequential data set. 

PSU 
Specifies a physical sequential data set that contains 
location-dependent information. 
Source: The DSORG operand must be coded in the DCB 
macro instruction. 

EODAD= 


The EODAD operand specifies the address of the routine 
given control when the end of an input data set is reached. 
Control is given to this routine when a GET macro 
instruction is issued and there are no additional records 
to be retrieved. If the record format is RECFM=FS or FBS 
the end-of-data condition is sensed when file mark is read 
or if more data is requested after reading a truncated 
block. If the end of the data set has been reached but no 
EODAD address has been supplied to the data control block, 
or if a GET macro instruction is issued after an 
end-of-data exit is taken, the task is abnormally 
terminated. For additional information on the EODAD 
routine, see in] j i : 


Source: The EODAD operand can be supplied in the DCB macro 
instruction or by the problem program before the end of the 
data set has been reached. 


EROPT={ACC {| SKP| ABE} 


The EROPT operand specifies the action taken by the system 
if an uncorrectable input/output data validity error occurs 
and no error analysis (SYNAD) routine address has been 
provided, or it specifies the action taken by the system 
after the error analysis routine has returned control to 
the system with a RETURN macro instruction. The specified 
action is taken for input operations for all devices or for 
output operations to a printer. 


Uncorrectable input/output errors resulting from channel 
operations or direct access operations that make the next 
record inaccessible cause the task to be abnormally 

LC a regardless of the action specified in the EROPT 
operand. 


ACC 
specifies that the problem program accepts the block 
causing the error. This action can be specified when 
a data set is opened for INPUT, RDBACK, UPDAT, or 
OUTPUT COUTPUT applies to printer data sets only). 
SKP 


specifies that the block that caused the error is to 
be skipped. Specifying SKP also causes the buffer 
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associated with the data block to be released. This 
action can be specified when a data set is opened for 
INPUT, RDBACK, or UPDAT. 


specifies that the error is to result in the abnormal 
termination of the task. This action can be specified 
when oe data set is opened for INPUT, OUTPUT, RDBACK, 
or UPDAT. 


If the EROPT operand is omitted, the ABE action 1s assumed. 


Note: If the EROPT operand is ACC or SKIP, accept or skip 
processing is done after returning from the error analysis 
CSYNAD) routine. For this reason, FEOV should not be 
issued from within the error analysis routine. 


Source: The EROPT operand can be specified in the DCB 
macro instruction, in the DCB subparameter of a DD 
statement, or by the problem program at any time. The 
problem program can also change the action specified at any 


time. 


=relexp 

The EXLST auorand specifies the address of the problem 
program exit list. The EXLST operand is required if the 
problem program requires additional processing for the 
following: user labels, user totaling, data control block 
exit routines, end-of-volume, block count exits, defining a 
forms control buffer (FCB) image, using the JFCBE exit (for 
the 3800 printer), or using the DCB abend exit for abend 
condition analysis. —— 


For the: format and requirements of exit list processing, 
see Appendix D, "DCB Exit List Format and Contents" on 
page 206. For additional information cpa exit routine 
processing, see 


Source: The EXLST operand can be supplied in the DCB macro 
instruction or by the problem program any time before the 
exit.is required by the problem program. 


LRECL= ={absexe|X10K|nonnok} 


he LRECL operand specifies the length, in bytes, for 
gee length logical records, or it specifies the maximum 
length, in bytes, for variable-length or undefined-length 
Coutput only) logical records. The value specified in the . 
LRECL operand cannot exceed the value specified in the 
are used. except when variable- length spanned records 
are use 


For fixed=Lensth records that are unblocked, the value 
specified in the LRECL operand must be equal to the value 
specified in the BLKSIZE operand. For blocked fixed-length 
records, the value specified in the LRECL operand must be 
eee into the value specified in the BLKSIZE 
operan Se 


For variable-length list ones the value specified in 
the LRECL operand must include the maximum data length Cup 
repay plus 4 bytes for the record-descriptor word. 


For undefined-length records, the problem program must 
insert the actual logical record length into the DCBLRECL 
field before writing the record, or the maximum-length 
record will be written. 


For variable-length spanned records, the logical record 
length (LRECL) can exceed the value specified in the 
BLKSIZE operand, and a variable-length spanned record can 
exceed the maximum block size (32760 bytes). When the 
logical record length exceeds the maximum block size (for 
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non-XLRI processing), LRECL=X must be specified and GET or 
PUT locate mode must be used oo 
For ISO/ANSI/FIPS variable-length spanned records CRECFM=DS a, 
or RECFM=DBS), the extended logical record interface (XLRI) we 
may be used when the maximum logical record length exceeds 
ete Byres: XLRI must be invoked by specifying LRECL=0K 

. The value nonnnk may range from 1K to 
16383K “The value determines the size of the record area 
Cin 1024-byte units) required to contain the longest 
logical record of the data set. When LRECL=0K is 
specified, the length of the longest logical record must 
come from the DD statement or the data set label. XLRI 
processing 18S only valid in QSAM locate mode. You must not 


specify LRECL=X for RECFM=D5 or DBS. 


Sources The LRECL operand can be supplied in the DCB macro 
instruction, in the DCB subparameter of a DD statement, by 
the problem program before completion of the data control 
block exit routine, or by the data set label of an existing . 
data set. The label will indicate a logical record length 
of *'99999" when an IBM standard label tape contains a 

logical record equal to or greater than 100K bytes. The 
label will indicate '00000' if the same maximum is reached 
for an ISO/ANSI/FIPS label tape. | 


Nete: When LRECL=0K is used in the DCB, the LRECL data 
must come from JCL, the file label (for an input data set), 
or from the DCB exit during open merge. 


Although LRECL=0K is only valid when RECFM=DS or DBS; you 
can specify the OK ception on the DCB macro even though the 
RECFM is not determined until the DCB is opened. (The 
RECFM is obtained from the data set label or the DD 
statement.) If you specify neither the DS nor the DBS 
option, the system turns the OK indicator off, and restores 
it when the DCB is closed 


MACRF={{(GLMILID}£C1)} co 

C(PCLM|[L[D}£C1)}} 

CL(GLIM(L{D}£C],PLMILIT{D}&C1)}} 

The MACRF operand specifies the type of macro instructions 

(GET, PUT or PUTX, CNTRL, RELSE, and TRUNC) and the 

transmittal modes (move, locate, and data) that are used 

with the data set being created or processed. The operand 

can be coded in any of the combinations shown above; the 

following describes the characters that can be coded: 


C | 
specifies that the CNTRL macro instruction is used 
with the data set. If the CNTRL macro instruction is 
specified, the data set should be for a card reader 
(stacker selection) or printer (carriage and spacing 
control). The CNTRL option can be specified with GET 
in the move mode only. Use of the CNTRL macro is 
invalid for 3525 input data sets. 


specifies that the data transmittal mode is used Conly 
the data portion of a record is moved to or from the 
work area). Data mode is used only with 
variable-length spanned records. 


specifies that GET macro instructions are used. 
Specifying G also provides the routines that allow the 
problem program to issue RELSE macro instructions. 


specifies that the locate transmittal mode is used; 
the system provides the address of the buffer 
containing the data. 
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M 
specifies that the move transmittal mode is used; the 
system moves the data from the buffer to the work area 
in the problem program. 

p 


specifies that PUT or PUTX macro instructions are 
used. Specifying P also provides the routines that 
allow the problem program to issue TRUNC macro 
instructions. 


Note: For data sets processed by QSAM using MACRF=(GM) or 
MACRF=(PM), do not code BFTEK=A. 


Source: The MACRF operand can be supplied only in the DCB 
macro instruction. 


OPTCD={{B} 
{T} 


{UIC]} 

{C(TICBICUI]} 

{HIZ1I(BI]} 

{JCICICUI} 

CWEICICITICBICUI} 

C{Z(ICILTIIBILUI} 

{Q(C]I{IBIL[TI} 

{Z}} 
The OPTCD operand specifies the optional services used with 
the QSAM data set. Two of the optional services, OPTCD=B 
and OPTCD=H, cannot be specified in the DCB macro 
instruction. They are requested in the DCB subparameter of 
a DD statement. Because all optional services codes must 
be supplied by the same source, the OPTCD operand must be 
omitted from the DCB macro instruction if either of these 
opticns 1s requested in a DD statement. The following 
describes the characters that can be specified: 


Cc 
requests that chained scheduling be used. OPTCD=C 
cannot be specified when either BFTEK=A or BFTEK=R is 
specified for the same data control block. Also, 
chained scheduling cannot be specified for associated 
data sets or printing on a 3525 and 18 ignored for 
direct access devices. 


Note: Except where it is not allowed, chained 
scheduling is used whether requested or not. For 
conditions under which it is not allowed, see Data 


Aam ation vuldae. 








specifies that the first data byte in the output cata 
line will be a 3800 table reference character. This 
table reference character selects a particular 
character arrangement table for the printing of the 
data line and can be used singly or in conjunction 
with ISO/ANSI/FIPS or machine control characters. 
This option is valid only for the IBM 3800 Printing 
Subsystem. For information on the table reference 
character and character arrangement table, see J BM 
3800 Printing Subsystem Programmer's Guide. 





requests that ISCII/ASCII tape records in an input 

data set be converted to EBCDIC code when the input 

record has been read, or an output record in EBCDIC 

code be converted to ISCII/ASCII code before the 

record is written. For further information on this 

conversion, see "Variable-Length Records-——Format D" in 
y= Poe = ra tii On VvVuLce. 







a 4 





The Q option is unconditionally set by open routines 
if the data set is for a tape with ISO/ANSI/FIPS 
labels. For ISCII/ASCII to EBCDIC or EBCDIC to 
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ISCII/ASCII translations, see Magnetic Tape Labels and 
File Structure Administration. 


Am 





requests the user totaling function. If this function 
is requested, the EXLST operand should specify the 
address of an exit list te be used. T cannot be 
specified for a SYSIN or SYSOUT data set. 


is specified only for a printer with the 
universal~character~-set feature or the IBM 3800 
Printing Subsystem. This opticn unblocks data checks 
Cpermits them to be recognized as errors) and allows 
analysis by the appropriate error analysis routine 
CSYNAD exit routine). If the U option is omitted, 
data checks are not recognized as errors. 


For the IBM Mass Storage System (MSS): U requests 
window processing to reduce the amount of staging 
space required to process large sequential data sets 
on MSS. DSORG must specify physical sequential, 
allocation must be in cylinders, and type cof I/0 
accessing must be either INPUT only or OUTPUT only. 


for DASD, specifies that the system is to perform a 
validity check on each record written on a direct 
access device. For buffered devices, specifies that 
device end interrupt is to be given only when a record 
46 physically on the device. By specifying OGPTCD=H 
with buffered devices, you do not benefit from the 
performance advantage of buffering. 


requests, for magnetic tape, input only, the system to 
shorten its normal error recevery procedure to 
consider a data check as a permanent I/0 error after 
five unsuccessful attempts to read a record. This 
option is available only if it is also specified as a 
SYSGEN option. OPTCD=Z is used when @ tape is known 
to contain errors and there is no need te process 
every record. The error analysis routine (SYNAD) 
should keep a count of permanent errors and terminate 
processing if the number becomes excessive. 


For direct access devices only, the 2 option is 
ignored. 


Note: The following describes the optional services that 
can be specified in the DCB subparameter of a DD statement. 
If either of these options is requested, the complete OPTCD 
operand must be supplied in the DD statement. 


B 
If OPTCD=B is specified in the DCB subparameter of a 
DD statement, it forces the end-of-volume CEQV) 
routine to disregard the end-of-filea recognition for 
magnetic tape. When this occurs, the EOV routine uses 
the number of volume serial numbers to determine end 
eof file. For an input data set on a standard labeled 
CSL or AL) tape, the EQV routine will treat EOF labels 
as EOQV labels until the velume serial list is 
exhausted. After all the volumes have been read; 
control ais passed to the user's end-of-data routine. 
Thais option allows SL or AL tapes to be read out of 
volume sequence or toe be concatenated ts another tape 
using one BD statement. 


If OPTCD=H is specified in the DCB subparameter of a 
DD statement, it specifies that the DOS/O0S interchange 
feature is being used with the data set. 
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The RECFM operand specifies the record format and 
characteristics of the data set being created or processed. 
All record formats can be used in QSAM. The following 
describes the characters that can be specified: 


A 


specifies that the records in the data set contain 
ISO/ANSI/FIPS control characters. For a description 
of control characters, see Appendix E, "Control 
Characters™ on page 208. 


specifies that the data set contains blocked records. 


specifies that the data set contains variable-length 
ISCII/ASCII tape records. See OPTCD=Q and the BUFOFF 
operand for a description of how to specify 
ISCII/ASCII data sets. 


specifies that the data set contains fixed-length 
records. 


specifies that the records in the data set contain 
machine code control characters. For a description of 
control characters, see Appendix E, "Control 
Characters™ on page 208. RECFM=M cannot be used with 
ISCII/ASCII data sets. 


specifies, for fixed-length records, that the records 
are to be written as standard blocks; the data set 
does not contain any truncated blocks or unfilled 
tracks, with the exception of the last block or track 
in the data set. Do not code S for fixed-length 
records to retrieve records from a data set that was 
created using a RECFM other than standard. 


For variable-length records, S specifies that a record 
can span more than one block. 


specifies that track overflow is used with the data 
set. Track overflow allows a record to be written 
partially on one track and the remainder of the record 
on the following track Cif required). Chained 
scheduling COPTCD=C) cannot be requested if track 
overflow 1s used. 


specifies that the data set contains undefined-length 
records. 


Note: Format-U recerds are not supported for Version 
3 ISO/ANSI/ZFIPS tapes. An attempt to process a 
format-U record for a Version 3 tape results ina 
label validation installation exit being taken. 


ISO/ANSI Version 1 CISO 1001-1969 or ANSI X3.27-1969) 
format-U records can be used for input only. These 
records are the same as the format-U records described 
above, except that the control characters must be 

vio hate control characters, and block prefixes can be 
used. 


specifies that the data set contains variable-length 
records. 
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Notes: 


e RECFM=V cannot be specified for a card reader data set 
or an ISO/ANSI/FIPS tape data set. 


® RECFM=VS, VBS, DS, or DBS cannot be specified for a 
SYSIN data set. 


e RECFM=DS or RECFM=DEBS provides blocking, unblocking, 
and segmenting for Version 3 ISO/ANSI/FIPS tape data 
sets. 


ey 


Source: The RECFM operand can be supplied in the DCB macro 
instruction, in the DCB subparameter of a DD statement, by 
the problem program before completion of the data control 
ee exit routine, or by the data set label of an existing 
ata set. 


SYNAD= 


The SYNAD operand specifies the address of the error 
analysis routine given control if an uncorrectable 
input/output error occurs. The contents of the registers 
when the error analysis routine 1S given control are 
described in Appendix A, "Status Information Following an 
Input/Output Operation™ on page 190. 


The error analysis routine must not use the save area 
pointed to by register 13, because this area is used by the 
system. The system does not restore registers when it 
regains control from the error analysis routine. The error 
analysis routine can issue a RETURN macro instruction that 
uses the address in register 14 to return control to the 
system. 


If the error condition was the result of a data-validity 

error, the control program takes the action specified in 

the EROPT operand; otherwise, the task is abnormally | : 
terminated. The control program takes these actions when Big eg 
the SYNAD operand is omitted or when the error analysis 

routine returns control. 


Source: The SYNAD operand can be supplied in the DCB macro 
instruction or by the problem program. The problem program 
can also change the error routine address at any time. 
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The DCBD macro instruction is used to generate a dummy control 
section that provides symbolic names for the fields in one or 
more data control blocks. The names and attributes of the 
fields appear as part of the description of each data control 
block in Appendix F, "Data Control Block Symbolic Field Names" 
on page 21ll. Attributes cf the symbolically named fields in the 
dummy section are the same as the fields in the data control 
blocks, with the exception of fields containing 3-byte 
addresses. The symbolically named fields containing 3-byte 
addresses have length attributes of 4 and are aligned on 
fullword boundaries. 


The labels generated by the DCBD macro should not be defined 
within a user program. The macro labels are structured as DCB 
xxxxx, Where DCB is the first 3 characters and xxxxx is 1 to 5 
alphameric characters. 


The name of the dummy control section generated by a DCBD macro 
instruction is IHADCB. The use of any of the symbolic names 
provided by the dummy section must be preceded by a USING 
instruction specifying IHADCB and a dummy section base register 
(which contains the address of the actual data control block). 
The DCBD macro instruction can only be issued once within any 
assembled module; however, the resulting symbolic names can be 
used for any number of data control blocks by changing the 
address in the dummy section base register. The DCBD macro 
instruction can be coded at any point ina control section; if 
coded at any point other than at the end of a control section, 
however, the control section must be resumed by coding a CSECT 
instruction. 


The DCBD macro is written: 


[DSORG=({GS]| 
[BSII,DAIT., [,PS1[,QS]})] 


[,DEVD=([DAI[,PCI[, 
[,MR])1] 





DSORG=({GS|CBS1L,DAIL,IS1£,LRI£,PO1£,PS1£,QS]} ) 
The DSORG operand specifies the types of data control 
blocks for which symbolic names are provided. If the DSORG 
operand is omitted, the DEVD operand is ignored, and 
symbolic names are provided only for the "foundation block! 
portion that is common to all data control blocks. One or 
more of the following pairs of characters can be specified 
Ceach pair of characters must be separated by a comma): 


BS 
specifies a data control block for a sequential data 
set and basic access method. 
DA 
specifies a data control block for a direct data set. 
Is 
specifies a data control block for an indexed 
sequential data set. 
LR . 
specifies a dummy section for the logical record 
length field (DCBLRECL) only. 
PO 
eee ues a data control block for a partitioned data 
set. 
PS 


specifies a data control block for a sequential data 
set. PS includes both BS and QS. 
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DCBD 
Qs 


specifies a data control block for a sequential data fo 
set and queued access method. a 


GS *y 3 

specifies a data control block for graphics; this 
operand cannot be used in combination with any of the 
above. 


DEVD=[DAI][,PC1][,PRILE,RDIL,TAIT,MRI 
The DEVD operand specifies the types of devices on which 
the data set can reside. If the DEVD operand is omitted 
and a sequential data set is specified in the DSORG 
operand, symbolic names are provided for all the device 
types listed below. One or more of the following pairs of 
characters can be specified; each pair of characters must 
be separated by a comma: 


DA 

Direct access device 
PC 

On-line punch 
PR 

On-line printer 
RD 

On-line card reader or read punch feed 
TA 

Magnetic tape 
MR 


Magnetic character reader 
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ESETL 








The ESETL macro instruction ends the sequential retrieval of 
data from an indexed sequential data set and causes the buffers 
associated with the specified data control block to be released. 
An ESETL macro instruction must separate SETL macro instructions 
issued for the same data control block. 


The ESETL macro is written: 


| Csvmbol 3 | ESETL 





—RX-Type Address, (2-12), or (1) 
The dcb address operand specifies the address of the data 
control block opened for the indexed sequential data set 
being processed. 
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The FEOV macro instruction causes the system to assume an 
end-of-volume condition, and causes automatic volume switching. 
Volume positioning .for magnetic tape can be specified by the 
option operand. If no option is coded, the positioning 
specified in the OPEN macro instruction is used. Output labels 
are created as required and new input labels are verified. The 
standard exit routines are given control as specified in the 
data control block exit list. For BSAM, all input and output 
operations must be tested for completion before the FEOV macro 
instruction is issued. The end-of-data-set (CEODAD) routine is 
given control if an input FEOV macro instruction is issued for 
the last volume of an input data set. FEOV is ignored if issued 
for a SYSIN or SYSOUT data set. a 4 


\ 


The FEOV macro is written: 





—RX-Type Address, (2-12), or (1) 
The dcb address operand specifies the address of the data 
control block for an opened Soduch tsar data set. 


REWIND | 
requests that the system position the tape at the load 
point regardless of the direction of processing. 


LEAVE : | 

requests that the system position the tape at the logical 
end of the data set on that volume; this option causes the 
tape to be positioned at a point after the tapemark that. 
follows the trailer labels. Note that multiple tape units 
must be available to achieve this positioning. If only one 
tape unit is available, its volume is rewound and unloaded. 


Note: If an FEOV macro is issued for a multivolume data 
set with spanned records that is being read using QSAM, 
errors may occur when the next GET macro is issued 
following an FEOV macro if the first segment on the new 
volume is not the first segment of a record. The errors 
include duplicate records, program checks in the user 
ane and invalid input from the variable spanned. data 
se 


The FEOV macro should not be used within the error analysis 
routine (SYNAD). 
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COMPLETION CODES 








FIND 
INNING ( A DATA MEMBER. ( BPAM 


The FIND macro instruction causes the system to use the address 
of the first block of a specified partitioned data set member as 
the starting point for the next READ macro instruction for the 
same data set. All previous input and output operations that 
specified the same data control block must have been tested for 
completion before the FIND macro instruction is issued. 


The FIND macro is written: 





—RX-Type Address, (2-12), or (1) 
The dcb address operand specifies the address of the data 
control block for the opened partitioned data set being 
processed. 


name address-——-RX-Type Address, (2-12), or (0) 
The name address operand specifies the address of an 8&-byte 
field that contains the data set member name. The name 
must start in the first byte and be padded on the right Cif 
necessary) to complete the 8 bytes. 


Specifies that only a member name has been supplied, and 
the access method must search the directory of the data set 
indicated in the data control block to find the location of 
the member. 


} —RX-Type Address, (2-12), or (0) 

The relative address list operand specifies the address of 
the area that contains the relative address (TTRK) for the 
beginning of a data set member. The relative address can 
be a list entry completed by using a BLDL macro instruction 
for the data set being processed, or the relative address 
can be supplied by the problem program. 


specifies that a relative address has been supplied, and neo 
directory search is required. The relative address 
supplied is used directly by the access method for the next 
input operation. 


Note: When using the FIND macro, the DCBRELAD address in 
the DCB is updated. The FIND macro should not be used 
after WRITE and STOW processing without first closing the 
data set and reopening it for INPUT processing. 


For relative address list» C, when the system returns control to 
the problem program, the low-order byte of register 15 contains 
the ce return code; the 3 high-order bytes of register 15 
are se o 0. 


relative address list, C 


00 — At all times. If the relative address is in error, 
execution of the next CHECK macro instruction causes 
| ee to be passed to the error analysis (CSYNAD) 
routine. 
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FIND 





pame address, D, when the system returns control to the 
problem program, the low-order byte of register 15 contains a 
return code and the low-order byte of register 0 contains a 
Freak soce: The 3 high-order bytes of these two registers are 
se re) 


name address» D 


Return Reason 
Code (15) Code (0) Meaning 


00 (X*00') 00 €X*00') Successful execution. 
04 €X*04") 00 €X*00') Name not found. 


038 (X*'08") 00 (X*00'} } Permanent I/0 error during directory 
search. | | 





08 CX*08") 04 (X"'06") Insufficient virtual storage available. 


08 CX'08') 08 (X'08') Invalid DEB. (Not in key 0 through 7.) 
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FREEBUF 
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The FREEBUF macro instruction causes the system to return a 
buffer to the buffer pool assigned to the specified data control 
block. The buffer must have been acquired using a GETBUF macro 
instruction. 


The FREEBUF macro is written: 


[symbol] 1] deb _ address 
| | »sregister 


—RX-Type Address, (2-12), or (1) 
The dcb address operand specifies the address of the data 
control block for an opened data set to which the buffer 
pool has been assigned. 


register—(2-12) 
The register operand specifies one of registers 2 through 
12 that contains the address of the buffer being returned 


to the buffer pool. 


gyros 
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The FREEDBUF macro instruction causes the system to return a 
buffer to the buffer pool assigned to the specified data control 
block. The buffer must have been acquired through dynamic 
buffering; that is, by coding 'S' for the area address operand 
in the associated READ macro instruction. 


Note: A buffer acquired dynamically can also be released by a 
WRITE macro instruction; see the description of the WRITE macro 
instruction for BDAM or BISAM. 


The FREEDBUF macro is written: 


[symbol1]} FREEDBUF} dech address 


»CKID 


» 





dech address——RX-Type Address, (2-12), or (0) 
The decbh address operand specifies the address of the data 


event control block (DECB) used or created by the READ 
macro instruction that acquired the buffer dynamically. 


specifies that BISAM is being used. 


specifies that BDAM is being used. 


—RX-Type Address, (2-12), or (1) 
The dcb address operand specifies the address of the data 
control block for the opened data set being processed. 
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FREEPOOL 
a PVG VAS : aly PPAM:s BSAM WEDAM:s AND GUSAM 


The FREEPOOL macro instruction causes an area of storage, 
previously acquired for a buffer pool for a specified data 
control block, to be released. The area must have been acquired 
either automatically Cexcept when dynamic buffer control is 
used) or by the execution of a GETPOOL macro instruction. For 
queued access methods, the FREEPOOL macro instruction must not 
be issued until after a CLOSE macro instruction has been issued 
for all the data control blocks using the buffer pool. For 
basic access methods, the FREEPOOL macro instruction can be 
issued as soon as the buffers are no longer required. A buffer 
pool should be released only once, regardless of the number of 
data control blocks sharing the buffer pool. 


The FREEPOOL macro is written: 


—RX-Type Address, (2-12), or (1) 
The dcb address operand specifies the address of a data 
control block to which the buffer pool has been assigned. 
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GET 





The GET macro instruction causes the system to retrieve the next fo 
record. Control is not returned to the problem program until ve 
the record is available. 


The GET macro is written: 





—RX-Type Address, (2-12), or (1) 
The dcb address operand specifies the address of the data 
control block for the opened input data set being 
retrieved. 


——-RX-Type Address, (2-12), or (0) 
The area address operand specifies the storage address into 
which the system is to move the record (move mode only). 
Either the move or locate mode can be used with QISAM, but 
they must not be mixed within the specified data control 
block. The rollowing describes operations for move and 
locate modes: 


Locate Mode: If locate mode has been specified in the data 
control block, the area address operand must be omitted. 
The system returns the address of the buffer segment 
containing the record in register 1. 


Move Mode: If move mode has been specified in the data 

control block, the area address operand must specify the 

address in the problem program into which the system will 

move the record. If the area address operand is omitted, 

the system assumes that register 0 contains the area 

address. When control is returned to the problem program, 

register 0 contains the area address, and register l Set, all 
contains the address of the data control block. - 


Notes: 


1. The end-of-data-set CEODAD) routine is given control if the 
end of the data set is reached; the data set may be closed 
if processing is completed, or an ESETL macro must be issued 
before a SETL macro to continue further input processing. 


2. The error analysis (SYNAD) routine is given control if the 
input operation could not be completed successfully. The 
contents of the general registers when control is given to 
the SYNAD exit routine are described in Appendix A, "Status 
ad a Following an Input/Output Operation"™ on 
page . 


3. When the key of an unblocked record is retrieved with the 
data, the address of the key is returned as follows (see the 
SETL macro instruction): 


ie Mode: The address of the key is returned in register 


Move Mode: The key appears in front of the record in your 
buffer area. 


G. If.a GET macro instruction is issued for a data set and the 
previous request issued for the same data set was an OPEN, 
ESETL, or unsuccessful SETL (no record found), a SETL B (key 
and data) is invoked automatically, and the first record in 
the data set is returned. 
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The GET macro instruction causes the system te retrieve the next 
record. Various modes are available and are specified in the 
DCB macre instruction. In the locate mode, the GET macro 
instruction locates the next sequential record or record segment 
to be processed. The system returns the address of the record 
in register 1 and places the length of the record or segment in 
the logical record length CDCBLRECL) field of the data control 
block. The DCBLRECL field is not changed when GET is used in 
XLRI processing. The user can process the record within the 
input buffer or move the record to a work area. 


In move mode, the GET macro ins struction moves the next 
sequential record to the user's work area. This work area must 
be large enough to contain the largest logical record of the 
data set and its record-descriptor word (variable-length 
records). The system returns the address of the work area in 
register 1]. The record length is placed in the DCBLRECL field. 
Move mode can be used only with simple buffering. 


In data mode, which is available only for variable-letgth 
spanned records, the GET macro instruction moves only the data 
portion of tha next sequential record to the user's work area. 
Tre TYPE=P cperand cannot be used with data mode. 


if the ISCII“ASCIT translation routines are included when the 
operating system is generated, translation can be requested by 
coding LABEL=¢€,A4L) or (€,AUL) ain the DD statement, or it can be 
reaquested by coding OPTCB=Q in the DCB macro instruction or DCB 
subparameter of the DD statement. When translation is 
requested, all QSAM records whose record format CRECFM operand) 
is F, FB, D, DS, BB, DBS, or U are automatically transiated from 
ISCII“ZASCII code to EBCDIC code as soon as the input buffer is 
full. For translation to occur correctly, all input data must 
be in ISCII/ASCII code. 


The GET macro is written: 





deb address —R*" Type Address, (2-12), or (1) 
he dcb address operand specifies the address of the data 
a block for the opened input data set being 
retrieved. 


pdab address--RX-Type Address, (2-12), or (1) 
The pdab address cperand specifies the address of the 
parallel data access block for the opened input data sets 
from which a record is to be retrieved. When pdab address 
as used, TYPESP must be caded. 


area address--R8X-Type Address, (2-12), or (03 
The area address operand specifies the addréss of an area 
into which the system is to move the record €move or data 
mode). The move, locate, or data mode can be used with 
QSAM, but must not be mixed within the specified data 
control block. If the area address operand is omitted in 
the move or data mode, the system assumes that register 0 
contains the area address. The following Gea ueee the 
overation of the three modas: 


Locate Made: If Locate mode has been specified in the data 
control block, the erea address operand must be omitted. 
The system returns the address cf the beginning buffer 
segment containing the record in register 1. If the data 
set is open for RDBACK, register 1 will point to the 
beginning of the record. 
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GET 


When retrieving variable-length spanned records, and the 
logical record interface (LRI) or extended logical record 
interface (XLRI) is not used, the records are obtained one 
segment at a time. The problem program must retrieve 
additional segments by issuing subsequent GET macro 
instructions, except when a logical record interface is 
requested (by specifying BFTEK=A in the DCB macro 
instruction or by issuing a BUILDRCD macro instruction, or 
by specifying DCBLRECL=0K or nnnnnk in the DCB macro). In 
this case, the control program retrieves all record 
segments and assembles the segments into a complete logical 
record. The system returns the address of this record area 
in register l. 


When the maximum logical ee is greater than 
32756 bytes, LRECL=X must be specified in the data control 
block, and the problem program must assemble the segments 
into a complete logical record. LRECL=X and/or segment 
mode processing is invalid for ISO/ANSI/FIPS spanned 
records, RECFM=DS or RECFM=DBS. 


Move Mode: If move mode has been specified in the data 
control block, the area address operand specifies the 
beginning address of an area in the problem program into 
which the system will move the record. If the data set is 
open for RDBACK, the area address operand specifies the 
ending address of an area in the problem program. 


If move mode has been specified in the data control block, 
do not code BFTEK=A. | 


For variable-length spanned records, the system constructs 
the record-descriptor word in the first four bytes of the 
area and assembles one or more segments into the data 
portion of the logical record area; the segment descriptor 
words are removed. When XLRI mode is used, the record 
erate maa word (RDW) in the record area is a fullword 
value. 


Data Made: If data mode has been specified in the data 
control block (data mode can be specified for 
variable-length spanned records only), the area address 
operand specifies the address of the area in the problem 
program into which the system will move the data portion of 
the logical record; a record-descriptor word is not 
constructed when data mode is used. The TYPE=P operand 
cannot be used with data mode. 


Extended Logical Record Interface (XLRI): When the GET 

macro is used in XLRI mode, the address returned in | 
register 1 points to a fullword record length value. The 
three low-order bytes of the fullwerd indicate the length 

Ee ee Be OSsERG record plus four bytes for the 
ullwor 


XLRI mode requires a record area to assemble a complete 
logical record from the segments that are read 


If a record area is not automatically obtained by OPEN 
processing, you can construct a record by using the 
BUILDRCD macro before issuing the OPEN. The DCB LRECL 
field indicates the length of the area in K units (1024 
bytes) required to contain the longest logical record of 
the data set. 


Note: If spanned records extend across volumes, errors may 
occur when using the GET macro if a volume that begins with 
a middle or last record segment is mounted first, or if an 
FEOV macro is issued followed by a GET macro. QSAM cannot 
begin reading from the middle of the record. (This applies > 
to move mode, data mode, and locate mode if logical record 
interface 1s specified.) 
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GET 


TYPE=P—Coded as shown | | 
The TYPE=P and PDAB address operands are used to retrieve a 
record from a queue of input data sets that have been 
opened. The open and close routines add and delete DCB 
addresses in the queue. The DCB from which a record is 
retrieved can be located from information in the PDAB. For 
this purpose, the formatting macro, PDABD, should be used. 


The end-of-data-set (EODAD) routine is given control if the end 
of the data set is reached; the data set must be closed. 
Issuing a GET macro instruction in the EODAD routine results in 
abnormal termination of the task. 


The error analysis (SYNAD) routine is given control if the input 
operation could not be completed successfully. The contents of 
the general registers when control is given to the SYNAD exit 
routine are described in Appendix A, "Status Information 
Following an Input/Output Operation™ on page 190. 
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The GETBUF macro instruction causes the control program to (- 
obtain a buffer from the buffer pool assigned to the specified a 2 
data control block and to return the address of the buffer in a 
designated register. The BUFCB field of the data control block 

must contain the address of the buffer pool control block when 

the GETBUF macro instruction is issued. The system returns 

control to the instruction following the GETBUF macro 

instruction. The buffer obtained must be returned to the buffer 

pool using a FREEBUF macro instruction. 


The GETBUF macro is written: 





addres (2- 12), or (1) 

The aah address operand specifies the address of the data 
ey aie block that contains the buffer pool control block 
address. 


ister-—(2-12) 
The register operand specifies one of the redietene 2 
through 12 in which the system is to place the address of 
the buffer obtained from the buffer peol. If no buffer is 
rida gaia the contents of the designated register are set 
o OQ. 
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GETPOOL 
=-R POC BDAM, BISAM> BPAMs BSAM>» QISAM>, AND QSAM) 


The GETPOOL macro instruction causes a buffer pool to be 
constructed in a storage area acquired by the system. The 
system places the address of the buffer pool control block in 
the BUFCB field of the data control block. The GETPOOL macro 
instruction must be issued either before an OPEN macro 
instruction is issued or during the data control block exit 
routine for the specified data control block. 


The GETPOOL macro is written: 





—RX-Type Address, (2-12), or (1) 
The dcb address operand specifies the address of the data 
control block to which the buffer pool is assigned. Only 
one buffer pool can be assigned to a data control block. 


—symbol, decimal digit, absexp, or (2-12) 
The number-of-buffers operand specifies the number of 
buffers in the buffer pool to a maximum of 255. 


——-symbol, decimal digit, absexp, or (2-12) 
The buffer length operand specifies the length, in bytes, 
or each buffer in the buffer pool. The value specified for 
the buffer length must be a doubleword multiple; otherwise, 
the system rounds the value specified to the next higher 
doubleword multiple. The maximum length that can be 
specified is 32760 bytes. For QSAM, the buffer length must 
be at least as large as the value specified in the block 
size (DCBBLKSI) field in the data control block. 


(0)—Coded as shown 
The number of buffers and buffer length can be specified in 
general register 0. If (0) is coded, register 0 must 
contain the binary values for the number of buffers and 
buffer length as shown in the following illustration: 


Register 0 


| Number of Buffers Buffer Length | 





Bits: 


The following illustration shows the format of the buffer pool. 
The buffer pool and the associated storage area are released by 
issuing a FREEPOOL macro instruction after issuing a CLOSE macro 
instruction for the data set indicated in the specified data 
control block. 


Macro Instruction Descriptions 103 





GETPOOL 


Area 


Address 


de 


Address of First Reserved Number Length 
| Available for of of Each 
Buffer Buffers Buffer 





Byte. | | 15 
Buffer Pool Control Block 


8 J 
Buffer Length 
(8 bytes 
eet a ey See Area Length 


Area Length= (Buffer Length) x (Number of Buffers) +8 
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MSGDISP 


| MSGDISP=“MESSAGE DISPLAY (DRIVE READY) 


C The MSGDISP macro is used to load the message display on an IBM 
8 3480 pooner e Tape Subsystem. Functions for the display 
include: 


Displaying a ready message 
Mount volume! 

Demount volume?! 

Reset display! 

Verify volume? 

Generalized display! 


1 For an explanation of these MSGDISP macro functions, see 


| MSGDISP—“DISPLAYING A READY MESSAGE 


The 


MSGDISP macro is written: 


RDY 


» DCB=addr 
[,TXT={ 'msatxt'" laddr}] 





RDY 


specifies that text supplied in the TXT parameter is 
displayed in positions 2 through 7 of the display while the 
data set 1s open. The display is steady (not flashing) and 
is enclosed in parentheses. The display is also written to 
the tape pool console Crouting code 3, descriptor code 7). 


DCB=addr 


TXT= 


specifies the address of a DCB opened to a data set on the 
mounted volume. If multiple devices are allocated, the 
message display is directed to the one containing the 
volume currently in use. 


Note: If multiple devices or multiple volumes are 
allocated, you may update a message display after an 
end-of-volume condition by using the EOV exit specified in 
a DCB exit list. In the case of a concatenated data set 
with unlike characteristics, the open DCB exit may be used 
to update the display. 


addr—RX-Type address, A-Type address, or (2-12) 
specifies an in-storage address of the opened DCB. 


{'msagtxt' laddr} 

specifies aS many as s1x characters to be displayed in 
positions 2 through 7. If TXT is not specified, blanks are 
displayed. 

| ? 


specifies the l1- to 6-character text. The text must be 
enclosed in apostrophes. 


addr-——RX-Type address, A-Type address, or (2-12) 
specifies an in-storage address of an area containing 
the text to be displayed. 
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| MSGDISP——LIST FORM 
The list form of the MSGDISP macro is written: 


[RDY] 


Fz 
 TXTS {'msgtxt" laddr}] 





RDY 
specifies that text supplied in the TXT parameter is 
displayed in positions 2 through 7 while a data set is 
open. The display is steady (not flashing) and 1s enclosed 
in parentheses. The display is written to the tape pool 
console Crouting code 3, descriptor code 7). 


DCB=addr 
specifies the address of a DCB opened to a data set on the 
mounted volume. If multiple devices are allocated, the 
message display is directed to the one containing the 
volume currently in use. 


Note: If multiple devices or multiple volumes are 
allocated, you may update a message display after an 
end-of-volume condition by using the EOV exit specified in 
a DCB exit list. In the case of a concatenated data set 
with unlike characteristics, the open DCB exit may be used 
to update the display. 


addr-~~A-Type address 
specifies an in-storage address of the opened DCB. 


MF=L 
specifies the list form of MSGDISP. This generates a 
parameter list that contains no executable instructions. 
The list can be used as input to and can be modified by the 
execute form. 


TXT={€ 'msatxt' laddr} 
specifies as many as six characters to be displayed in 
positions 2 through 7. If TXT is not specified, blanks are 
displayed. 


v q 
specifies the 1l1- to 6-character text. The text must be 
enclosed in apostrophes. 


addr-~A-Type address 
specifies an in-storage address of an area containing 
the text to be displayed. 
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The execute form of the MSGDISP macro is written: 
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RDY | 
> pepraddcl | | 
»MFS(E» addr 

E> TXT={ 'msatxt' laddr}] 


MSGDISP 





ANOS AR ADOT ERASE ECT RE RENTER HY ATRIA A 


RDY 
specifies that text supplied in the TXT parameter is 
displayed in positions 2 througn 7 while a data set Ls 
open. The display is steady Cnet flashing) and is ancloased 
in parentheses The display 15 written te the tape pool 
console Creuting code 3, descriptor code 7). 


HOB=a ddr 
specifies the address of a DCB apened to a data set an tha 
mounted volume. If multiple devices sre allocated, the 
message display is directed to the one containing the 
volume currently in use. 





Note: If multiple devices or multiple volumes are 
allocated, you may update a message display after an 
end-of-volume candition by using the EQV exit specified in 
a DCB exit list. In the case of a concatenated data set 
with unlike characteristics, the open DCB exit may be used 
to update the display. 








addr-—-RX-Type address, A-Type address, or (2-12) 
specifies an in-storage address of the epened DCR. 


MFOCE»saddr } 
specifies that the execute form of MSGDISP and an existing 
parameter list is used. 


addr-—-Rix-Type address, (1), or €2~-12) . 
specifies an in-storage address of the parameter list. 


TXT=€ 'msgtxt* laddr} | 
specifies as many as six characters to be displaved in 
positions 2 through 7. If TXT is not specified, blanks are 
displayed. 


J 


“specifies the l- to 6-character text. The text must be 
enclosed in apostrophes. 








addr-~--R2X-Type address, A-Tyvee address, or (2-123 
specifies an in-storage address of an area containing 
the text to be displayed. 
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MSGDISP 
| COMPLETION CODES 
When the system returns control to your problem program, the e 


low-order byte of register 15 contains a return code; the 
low-order byte of register 0 contains a reason code: 


utero 


Return Reason 

Code (15) Code (0) Meaning 

00 ¢X*00') _ Successful completion 

04 (X'04') ss Device does not support MSGDISP 


08 CX'08") O02 (X'02') Invalid DCB or DEBCHK error 
08 (X'08') 03 (X'03') Environmental error 

08 ¢X'08*") 04 (X'0G") Authorization violation 

08 CX'08") 05 (X'05"') Invalid UCB 

08 (X'08") 06 €X'06') Invalid request 

08 (X*'08") 11 (X'OB') Unsuccessful ESTAE macro call 
08 (X*'08'") 12 (X*0C*) Unsuccessful GETMAIN request 


l2 (X'o0ct) Input/output error (1/0 Supervisor 
posted the request as an error) 


| 
| 
| 
[ 08 (X"'08") 01 ¢€X'01") Invalid parameter 
| 
| 
| 
| 
| 
| 
| 


Note: An I/0 error occurs for load 
display if the drive display has a 
hardware failure. 
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NOTE 


POSITION PAM AND vy APE AND DIRECT ACCESS ONI 

The NOTE macro instruction causes the system to return the 
position of the last block read from or written into a data set. 
All input and cutput operations using the same data control 
block must be tested for completion before the NOTE macro 


instruction is issued. 


The capability of using the NOTE macro instruction is 
automatically provided when a partitioned data set is used 
CDSORG=P0 or POU), but, when a sequential data set (BSAM) is 
used, the use of NOTE/POINT macro instructions must be indicated 
in the MACRF operand of the DCB macro instruction. 


The NOTE macro is written: 





dcb address 
» TYPE={ABS [| REL} 1 


35-—RX-Type Address, (2-12), or (1) 
The dcb address operand specifies the address of the data 
control block opened for the partitioned or sequential data 
set being processed. 


TYPE={ABS | REL} 


ABS | 

specifies that, after NOTE executes successfully 
Ccontents of register 15 is 0), register 0 contains 
the physical block identifier for the next data block 
waiting for transfer between main storage and the 
control unit buffer, and register 1 contains the 
physical block identifier of the next data block 
waiting for transfer between the control unit buffer 
and the tape drive. | 


If you subtract the low-order 20 bits of register ] 
from the low-order 20 bits of register 0, the 
remainder is the number of data blocks left in the 
control unit buffer. A negative remainder means the 
buffer is in read mode, anda positive remainder means 
the buffer is in either write or read-backward mode. 

A zero remainder means that no data is buffered. 


causes the system to return the relative position of 
the last block read from or written into a data set. 
The position, in terms of the current volume, is 
returned in register 1 as follows: 


Magnetic Tape 


The block number is in binary, right-adjusted in 
register 1l with high-order bits set to zero. Do not 
use a NOTE macro instruction for tapes without 
standard labels when: 





@ The data set is opened for RDBACK (specified in 
the OPEN macro instruction), or 

9 The DISP parameter of the DD statement for the 
data set specifies DISP=MQD. 
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NOTE 


COMPLETION CODES 


Direct Access Device 
TTR2 format, where: 
TY is a 2-byte relative track number. 


R is a l-byte block (record) number on the track 
indicated by TT 


Zz is a byte set to zero. 
The NOTE macro instruction cannot be used for SYSOUT data sets. 


Note: When a direct access device is being used, the amount of 
remaining space on the track is returned in register 0 if a NOTE 
macro instruction follows a WRITE macro instruction; if a NOTE 
macro instruction follows-a READ or POINT macro instruction, the 
be Ral en olan of the direct access device is returned in 
register 


When the system returns control to your preblem program and you 
have specified the ABS parameter, the low-order byte of register 
15 contains a return code; the low-order byte of register 0 
contains a reason code: 


Return Reason 

Code (15) Cade (0) Meaning 

GO ¢X*OO*) Successful completion. 

06 “(X'06") Device does not support block 
identifier. 


08 CX'08*) 01 CX'O1L*) Incorrect parameter. 
G8 CX*08°3 G2 (X'02') Incorrect DCB or a DEBCHK error. 


08 CX'08') 03 €X'03") Environmental error. 


08 ¢X'08*) 11 (X*OB') Unsuccessful call to ESTAE macro. 
G8 (X*08") 12 (X*0C') Unsuccessful GETMAIN request. 


12 ¢(X'0c*) Input/output error. 
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OPEN 


A DA 


The OPEN macro instruction causes the specified data control 
block(s) to be completed and the data set(s) identified in the 
data control block(€s) to be prepared for processing. Input 
labels are analyzed and output labels are created. Control is 
given to exit routines as specified in the data control block 
exit list. The processing method Coption 1) is designated to 
provide correct volume positioning for the data set and define 
the processing mode CINPUT, OUTPUT, and so forth) for the data 
set(s). Final volume positioning (when volume switching occurs) 
can be specified Coption 2) to override the positioning implied 
by the DD statement DISP parameter. Option 2 applies only to 
volumes ina multivolume data set other than the last volume. 
Any number of data control block addresses and associated 
options may be specified in the OPEN macro instruction. 


The maximum number of DCBs that can be concurrently open to one 
unit is 127 


If associated data sets for a 3525 card punch are being opened, 
all associated data sets must be open before an I/0 operation is 
initiated for any of the data sets. For a description of 
associated data sets, see / j 


al- Sele = e VS ot GS 





To support DEB validity checking, an OPEN macro instruction must 
be issued for every data extent block (DEB) created. 


The standard form of the OPEN macro instruction is written as 
follows (the list and execute forms are shown following the 
description of the standard form): 


[symbol] ] | (deb address, [loptions)],...) 
» tC TYPE=J] 


—A-Type Address or (2-12) 
The dcb address operand(s) specifies the address of the 
data control block(s) for the data set(s) to be prepared 
for processing. 


The options operands shown in the following illustration 
indicate the volume positioning available based on the 
device type and access method being used. If option 1 is 
omitted, INPUT is assumed. If option 2 is omitted, DISP is 
assumed. Option 1 must be coded if option 2 is coded. 
Option 2 is ignored for SYSIN and SYSOUT data sets. 

Options 1 and 2 are ignored for BISAM and QISAM Cin the 
scan mode), and the data control block indicates the 

Lips panes OUTPUT or OUTIN must be specified when creating 
a data set. 
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OPEN 
Access 
Method 


QSAM 


BSAM 


QISAM 


Load Mode 


BPAM, 
BDAM 


Magnetic Tape 


Option 1 


[INPUT ] 
[EXTEND] 
[OUTPUT] 
C[RDBACK] 


CINPUT 1] 
[EXTEND] 
[OUTINX] 
[OUTPUT] 
[INOUT ] 
[OUTIN ] 
C[RDBACK] 


DEVICE TYPE 


Direct Access 


Other Types 


Option 2 Option 1 Option 2 Option 1 Option 2 
[»REREAD] [INPUT ] [,REREAD] [INPUT ] =< 
{[,LEAVE ] CLEXTEND] [,LEAVE ] [EXTEND] 
[,DISP ] [OUTPUT] [,DISP 1] [OUTPUT] 
[UPDAT] 
[,REREAD] [INPUT ] &,REREAD] [INPUT 1] — 
[,LEAVE ] [EXTEND] [,LEAVE ] [OUTPUT] 
[,DISP ] f[OUTINX] [,DISP 1 [OUTPUT] 
[OUTPUT] [OUTPUT] 
[INOUT ] 
COUTIN ] 
C[UPDAT ] 
= [OUTPUT] — — =o 
[EXTEND] 
ae CINPUT ] =— = = 
[OUTPUT] 
[UPDAT ] 


The following describes the options shown in the preceding 


illustration. 


Option 1 
EXTEND? 


INPUT 
INOUT? 


GUTPUT 


OUTIN? 


OUTINX?! 


RDBACK 


UPDAT 


All option operands are coded as shown. 
Meaning 


The data set is treated as an OUTPUT data set, except 
that records will be added to the end of the data set 
regardless of what was specified on the DISP parameter 
of the DD statement. 


Input data set. 


The data set is first used for input and, without 
reopening, 18S used as an output data set. The data 
set 15 processed as INPUT if it is a SYSIN data set or 
if LABEL=(€,,,IN) is specified in the DD statement. 


Output data set (for BDAM, OUTPUT is equivalent to 
UPDAT). 


The data set is first used for output and, without 
reopening, is used as an input data set. The data set 
1s processed as OUTPUT if it is a SYSOUT data set or 
if LABEL=C€,,,0UT) is specified in the DD statement. 


The data set is treated as an OUTIN data set, except 
that records will be added to the end of the data set 
regardless of what was specified on the DISP parameter 
of the DD statement. 


Input data set, positioned to read backward. 


Note: Variable-length records cannot be read 
backward. 


Data set to be updated in place or, for BDAM, blocks 
are to be updated or added. 


i These options are not allowed for ISO/ANSIZFIPS Version 3 
tape processing. 
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Optio 
LEAVE 





OPEN 
n 2 Meaning 


Positions the current tape volume to the logical end 
of the data set when volume switching occurs. If 
processing was forward, the volume is positioned to 
the end of the data set; if processing was backward 
CRDBACK), the volume is positioned to the beginning of 
the data set. 


REREAD Positions the current tape volume to reprocess the 


DISP 


Note: 
the c 
proce 


The L 
tape 
TYPE= 
execu 


TYPE= 


data set when volume switching occurs. If processing 
was forward, the volume is positioned to the beginning 
of the data set; if processing was backward CRDBACK), 
the volume is positioned to the end of the data set. 


Specifies that a tape volume is to be disposed of in 
the manner implied by the DD statement associated with 
the data set. Direct access volume positioning and 
disposition are not affected by this parameter of the 
OPEN macro instruction. There are several 
dispositions that can be specified in the DISP 
parameter of the DD statement; DISP can be PASS, 
DELETE, KEEP, CATLG, or UNCATLG. This option has 
Significance at the time an end-of-volume condition is 
encountered only when DISP is PASS. The end-of-volume 
condition may result from the issuance of an FEOV 
macro instruction or may be the result of reaching the 
end of a volume, 


If DISP is PASS in the DD statement, the tape will be 
spaced forward to the end of the data set on the 
current volume. 


If any DISP option is coded in the DD statement, 
Cexcept when DISP is PASS), the resultant action at 
the time an end-of-volume condition arises depends on 
C1) how many tape units are allocated to the data set 
and ©€2) how many volumes are specified for the data 
set in the DD statement. This is determined by the 
UNIT and VOLUME parameters of the DD statement 
associated with the data set. If the number of 
volumes is greater than the number of units allocated, 
the current volume will be rewound and unloaded. If 
the number of volumes is less than or equal to the 
number of units, the current volume is merely rewound. 


When the DELETE option is specified, the system waits for 
ompletion of the rewind operation before it continues 
ssSing subsequent reels of tape. 


EAVE and REREAD options are meaningless except for magnetic 

and CLOSE TYPE=T. Any other options specified for CLOSE 

a LEAVE and REREAD will be treated as LEAVE during 
icn. 


J 

You can code OPEN TYPE=J to specify that, for each data 
control block referred to, you have supplied a job file 
control block CJFCB) to be used during initialization. A 
JFCB is an internal representation of information ina DD 
statement. This option, because it 1s used in conjunction 
with modifying a JFCB, should be used only by the system 
programmer or only under the system programmer's 
supervision. 


When you specify TYPE=J, you must also supply a DD 
statement. The amount of information in the DD statement 
is subject to discretion, but you must specify the device 
allocation and a ddname that corresponds to the associated 
data control block DCBDDNAM field. 


For more detailed information on using TYPE=J, see 
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OPEN 


Note: After the OPEN macro instruction has been executed, bit 3 


of the DCBOFLGS field in the data control block is set to l if 
the data control block has been opened successfully, but is set 


to 0 if the data control block has not been opened successfully. 


Note: To use the OPEN macro instruction supplied in the MVS/XA 
macro library on MVS/370, use the SPLEVEL macro instruction. 
You must use the SPLEVEL macro instruction to ensure that the 
MVS/XA version of the OPEN macro instruction executes 
successfully on MVS/370 DFP. For information on how to use the 
SPLEVEL macro, see System Macros and Facilities, Volume 2. 
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OPEN 


The following errors cause the results indicated: 
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Error | Result 





fpismetatis mcesersms 
ji 


| Attempting to open a data control | No action. 
: block that is already open. | 


Ationntins to open a ee central | Unpredictable. 
block when the dcbh address 
operand does not specify the 
, address of a data control block. 
Attempting to open a DCB for a | Task shnornstly 
printer with the UCS feature and | terminated. 
an error occurred when attempting | 
to block or unblock data checks 
{specified by the presence or 
absence of OPTCD=U in the DCB 


, macro). | 
Mttanotine to open a date centeel. | A *DD STATEMENT MISSING" 
block when a corresponding DD | message is issued. An 
statement has not been provided. | attempt to use the data 

i set causes unpredictable 
results. 


SAS A AAA SY CI SB 


The last of these errors can be detected by testing bit 3 of the 
DCBOFLGS field in the data control block. Bit 3 is set to @ in 
the case of an error and can be tested by the sequence: 


TT DCBOFLGS,X‘*10° 

BZ ERRORRTN (Branch to user's error routine) 
Executing the two instructions shown above requires writing a 
DCED macro instruction in the program, and a base register must 


be defined with a USING statement before the instructions are 
executed. 
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The list form of the OPEN macro instruction is used to construct cs 


a data management parameter list. Any number of operands (data ee” 
control block addresses and associated options) can be 
specified. | 


The list consists of a one-word entry op each DCB in the 
parameter list; the high-order byte is used for the options and 
the three low-order bytes are used for the DCB address. The end 
of the list is indicated by a l in the high-order bit of the 
last entry's option byte. The length of a list generated by a 
list form instruction must be equal to the maximum length list 
required by any execute form instruction that refers to the same 
mathe i A maximum length list can be constructed by one of two 
methods: 


@ Code a list- Farm instruction with the maximum RUnbor of 
parameters that are required by an execute form instruction 
that refers to the list. 


@ Code a maximum fohath list by using commas in a list-form 
instruction to acquire a list of the appropriate size. For 
example, coding OPEN (,,,55,5,,,),MF=L would provide a list 
of five fullwords (five dcb addresses and five options). 


Entries at the end of the list that. are not referenced by the 
execute-form instruction are assumed to have been filled in when 
the list was constructed or by a previous execute-form 
instruction. Before using the execute-form instruction, you may 
shorten the list by placing a 1 in the high-order bit of the 
last DCB entry to be processed, 


A zeroed work area on a fullword boundary is equivalent to OPEN 
C,CINPUT,DISP),...),MF=L and can be used in place of a list-form 
instruction. The high-order bit of the last DCB entry must 
contain a l before this list can be used with the execute-form 
instruction. 7 | 


A parameter list constructed by an OPEN, list-form, macro 
instruction can be referred to by either an OPEN or CLOSE 
execute form instruction. 


The description of the standard form of the OPEN macro 
instruction provides the explanation of the function of each 
operand. The description of the standard form also indicates 
which operands are completely optional and those required in at 
least one of tha pair of: list and execute forms. The format 
description below indicates the optional and required operands 
in the list/ form only. 


The list form of the OPEN macro is Wrateen: 


(tdeb address}, {(gptions)1,...) 


»>MF=L 
ty TYPE=J]1 





deb address—A-Type Address 


MF= L—Coded as shown 
The MF=L operand specifies that the OPEN macro instruction 
is used to create a data management parameter list that is 
referenced by an execute form instruction. 


TYPE=J 

You can code OPEN TYPE=J to specify that, for each data 
control block referred to, you have supplied a job file 
control block CJFCB) to be used during initialization. A 
JFCB is an internal representation of information in a DD 
statement. This option, because it is used in conjunction 

| with modifying a JFCB, should be used only by the system 
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srogrammer or only under the system programmer's 
supervision. 


When you specify TYPZ=J, you must also surply a DDB 
statenent. The amount of information in the DD statement 
is swibject to your discreticn, but you must specify the 
device allocation and a ddname that corresponds te the 
associated data control block DCBDDNAM field. 


For more detailed information on using TYPE=J, sea 
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A remote data management parameter list is used in, and can be 
modified by, the execute form of the OPEN macro instruction. 

The parameter list can be generated by the list form of either 
an OPEN or CLOSE macro instruction. 


The description of the standard form of the OPEN macro 

instruction provides the explanation of the function of each 

operand. The description of the standard form also indicates 

which operands are totally optional and those required in at 

least one of the pair of list and execute forms. The format 

description below indicates the optional and required operands 
an the execute form only. 


The execute form of the OPEN macro ie written: 


| [ (ideb address)» » Coptions}]» + «- 33 





[,TYPE= Jr 


deb address-——-RX-Type Address or (2-12) 


MF=(E,{data Jen j ess/i(1) 
This Soerand speci fies that the execute form of the OPEN 
macro instruction is used, and an existing data management 
parameter list (created by a list-form instruction) is 
used. The MF= operand is coded as follows: 





E—Coded as shown 





——-RX-Type, (2-12), C1) 


TYPE=J 
You can code OPEN TYPE=J to specify that, for each data 
control block referred to, you have supplied a job file 
control block CJFCB) to be used during initialization. A 
JFCB is an internal representation of information ina DD 
statement. This option, because it is used in conjunction 
with modifying a JFCB, should be used only by the system 
programmer or only under the system programmer's 
supervision. 


When you specify TYPE=J, you must also supply a DD 
statement. The amount of information in the DD statement 
is subject to your discretion, but you must specify the 
device allocation and a ddname that corresponds to the 
associated data control block DCBDDNAM field. 


For more detailed information on using TYPE=J, see 
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PDAB 





The PDAB macro instruction is used in conjunction with the GET 
CTYPE=P) macro instruction. It defines an area in the problem 
program where the open and close routines build and maintain a 
queue of DCB addresses for use by the get routine. 


The parallel data access block is constructed during the 
assembly of the problem program. The MAXDCB operand must be 
coded in the PDAB macro instruction, because it cannot be 
supplied from any other source. 


Certain data set characteristics prevent a DCB address from 
being available on the queue—see the _description of QSAM 
parallel input processing in : 


The PDAB macro is written: 


[symbol1]} PDAB MAXDCB=dcbh number 


MAXDCB=absexp Cmaximum value is 32767) 
specifies the maximum number of DCBs that you require in 
the queue for a GET request. 


Note: The number of bytes required for PDAB is equal to 
24t+8n, where nis the value of the keyword, MAXDCB. 


\ 
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The PDABD macro instruction is used to generate a dummy control 
section that provides symbolic names for the fields in one or 
more parallel data access blocks. The names, attributes, and 
descriptions of the fields appear in Appendix G, "PDABD Symbolic 
Field Names™ on page 228. 


The name of the dummy control section generated by a PDABD macro 
instruction is IHAPDAB. The use of any of the symbolic names 
provided by the dummy section should be preceded by a USING 
instruction specifying IHAPDAB and a dummy sectican base register 
containing the address of the actual paraliel data access black. 
The PDABD macro instruction should only be used once within any 
assembled module; however, the resulting symbolic names can be 
used for any number of parallel data access blocks by changing 
the address in the dummy section base register. The PDABD macro 
instruction can be coded at any point ina control section. If 
coded at any point other than at the end of a control section, 
the control section must be resumed by coding a CSECT 
instruction. 


The PDABD macro is written: 
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POINT 
RELATALVE BLOCK ({BPAM AND BSAM APE AND DIRECT ACCESS ON 


The POINT macro starts the next READ or WRITE operation at the 
specified data set block on the current volume. Before you 
issue POINT macro, ensure that all input and output operations 
using the same data control block are tested for completion. If 
you are processing a data set that has been opened for UPDAT, 
you must issue a READ macro immediately after the POINT macro. 
If you are processing an output data set, you must issue a WRITE 
macro immediately after the POINT macro before you close the 
data set, unless you have already issued the CLOSE macro (with 
TYPE=T specified) before the POINT macro. 


Note: If you specify the TYPE=T option in the CLOSE macro and 
you do not issue a WRITE macro before you close the data set, 
use the end-of-data location that is determined by TCLOSE. 


The POINT macro is written: 


[symbo]l]} POINT dcb_ address 
block address 
; LTYPE={ABS | REL} 





—RX-Type Address, (2-12), or (1) 
The dcb address operand specifies the address of the data 
control block for the opened data set that is to be 
positioned. 


—RX-Type Address, (2-12), or (0) 
The block address operand indicates which block in the data 
set is to be processed next. 


For an IBM 3480 Magnetic Tape subsystem, when TYPE=ABS is 
specified, the block address operand specifies the address 
of a fullword on a fullword boundary that contains the 
physical block identifier of the block in the data set that 
is to be processed next. This physical block identifier is 
provided as output from a prior execution of the NOTE 
macro. 


When TYPE=REL is specified or defaults, the block address 
operand specifies the address of a fullword on a fullword 
boundary that contains the relative address of the block in 
the data set that is to be processed next. The relative 
address is specified as follows: 


Magnetic Tape: The block number is in binary and is 
right-adjusted in the fullword with the high-order bits set 
to 0; add 1 if reading tape backward. Do not use the POINT 
macro instruction for tapes without standard labels when: 


@ The data set is opened for RDBACK, or 
e The DD statement for the data set specifies DISP=MOD 


If OPTCD=H is indicated in the data control block, the 
POINT macro instruction can be used to perform record 
positioning on DOS tapes that contain embedded checkpoint 
records. Any embedded checkpoint records that are 
encountered during the record positioning are bypassed and 
are not counted as blocks spaced over. OPTCD=H must be 
specified in a job control language DD statement. Do not 
use the POINT macro instruction to backspace DOS 7-track 
tapes that are written in data convert mode and that 
contain embedded checkpoint records. 


Note: When an end-of-data condition is encountered on 
magnetic tape, you must not issue the POINT macro 
instruction unless you have first repositioned the tape for 
processing within your data set; otherwise, the POINT 
operation will be unsuccessful. (CIssuing CLOSE TYPE=T is 
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POINT 


COMPLETION CODES 


an easy method to use to accomplish repositioning in your 
EODAD routine. ) 


Direct Access Device: The fullword specified in the block 
address operand contains the relative track address" Cin the 
form TTRz2), where: 


TT is a 2- byte relative track number. 

R is a l-byte block Crecord) number on the track 
indicated by TT 

z is a byte set to 0; it may also be set to 1 to retrieve 
the block following the TTR block. 


Note: The first block of a magnetic tape data set is 
always specified by the hexadecimal value 00000001. The 
first block of a direct access device data set can be 
specified by either hexadecimal 00000001 or 00000100 (see 
the preceding description of TTRz2). 


TYPE={ABS | REL} 
indicates whether the block address operand is a physical 
block identifier or a relative address. 


ABS 
indicates that the block address operand specifies an 
address of a fullword ona fullword boundary 
containing a physical block identifier of the block in 
the data set that is to be processed next. 


indicates that the block address operand specifies an 
address of a fullword on a fullword boundary 
containing the relative address of the block in the 
data set that is to be processed next. 


POINT cannot be used for SYSIN or SYSOUT data sets. 


If the volume cannot be positioned correctly or if the block 
identification is not of the correct format, the error analysis 
CSYNAD) routine is given control when the next CHECK macro 
instruction is executed. 


When the system returns control to your problem program and you 
have specified the ABS parameter, the low-order byte of register 
15 contains a return code; the low-order byte of register 0 
contains a reason code: 


Return Reason 


Code (15) Code (0) Meaning 


00 ¢€X'00") Successful completion. 


04 


08 
08 
08 
08 
08 
12 
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CX'04") 


CX'08') 
CX'08") 
CX'08") 
CX'08") 
CX'08!) 
CX'0C!) 


01 
02 
03 
11 
12 


CX*'01") 
CX*'02'") 
(X*03') 
CX" OB) 
(X*0C') 





Device does not support block 
identifier. 


Incorrect parameter. 

Incorrect DCB or a DEBCHK error. 
Environmental error. 

Unsuccessful call to ESTAE macro. 
Unsuccessful GETMAIN request. 


Input/output error. 
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The PRTOV macro instruction is used to control the page format 
for an online printer when carriage control characters are not 
being used or to supplement the carriage control characters that 
are being used. 


The PRTIOV macro instruction causes the system to test for an 
overflow condition on the specified channel Ceither channel 9 or 
channel 12) of the printer carriage control, and either skip the 
printer carriage to the line corresponding to channel 1, or 
transfer control to the exit address, if one is specified. 
Overflow is detected after printing the Line that follows the 
line corresponding to channel 9 or channel 12. The PRTOV macro 
should be issued each time you want the system to test for an 
overflow condition. 


When the PRTQV macro instruction is used with a 3525 card punch, 
print feature, channel 9 or 12 can be tested. If an overflow 
condition occurs, control is passed to the overflow exit routine 
if the overflow exit address is coded, or a skip to channel 1 
(farst print-line of the next card) occurs. 


When requesting overprinting (for example, to underscore a 
line), the PRTOV macro instruction is issued before the first 
PUT or WRITE macro instruction only. The PRTOV macro 
instruction should be issued only when the device type is an 
online printer. PRTOV cannot be used to request overprinting on 
the 3525. Overprinting cannot be performed on the 3800. 


The PRTOV macro is written: 





eine deb edrece Speeace psec fice the address of the data 
conteol block opened for output to an online printer or 
3525 card punch with a print feature. 


9——-Coded as shown 

lé-——Coded as shown 
These operands specify the channel that is to be tested by 
the PRIGV macro instruction. For an online printer, 9 and 
12 correspond to carriage control channels 9 and l@. For 
the 3525 card punch, 9 corresponds to print line number 17, 
and 12 corresponds to print line number 23. More eerie 
about the card print-line format is ecb oa in OS and 

iS Prooramming Suppo! for the IBM 35 ard [eer pou 





the BvECelon exit acldieece operand tae the address of 
the user-supplied routine to be given control when an 
overflow condition is detected on the specified channel. 
If this operand is omitted, the printer carriage skips to 
the first line of the next page or the 3525 skips to the 
first line of the next card before executing the next PUT 
or WRITE macro instruction. 
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PRyoVv 
When the cverflow exit routine is given control, the centents sof 


the registers ars as follows: = 


ae \ 
Register Cantents KO yf 


0 and 1 The contents are destroyed. 


2-~- 13 The same contents as before the macre instruction was 
executed. 

14 . Return address. 

15 Overfiow exit routine address. 
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PUT“""MRITE NEXT LOGICAL RECORD (QISAM) 
The PUT macro instruction causes the system to write @ record 
into an indexed sequentiszl data set. If the move mode 18 used, 
the PUT macro instruction meves a logical record into an output 
buffer from which it is written. If locate mede is specified, 


the address of the next available output buffer segment is 
available in register 1 after the PUT macro instruction is 
executed. The logical record can then be constructed in the 
buffer for output es the next record. The records are blocked 
by the system (if specified in the data control block) before 
being placed in the data set. The system uses the length 
specified in the record length (DCBLRECL) field of the data 
control block as the length of the record currently being 
written. When constructing blocked variable-lensth records in 
the locate mode, the problem program may either seecify the 
maximum record length once in the DCBLRECL fieid of the data 
control biock or provide the actual record length in the 
DCBLRECL field before issuing wach PUT macro instruction. Use 
of the maximum record length may resuit in more but shorter 
blocks, because the system uses this length when it tests to see 
if the next record can be contained in the surrent block. 








The PUT macro instruction is used to create or extend an indexec 
sequential data set. To extend the data set, the key of any 
added record must be higher than the highest key existing in tite 
data set, and the disposition parameter of the DD card must be 
specified as DISP=M0OD. The new records are placed in the prime 
data space, starting in the first avazlable space, until the 
original space allocation is exhausted. 


To create a data set using previously allocated space, the 
disposition parameter of the DD card must specify DISP=OLD. 


The PUT macro is written: 





dch address—RX-Type Address, (2-12), or (1) 
The dcb address operand specifies the address of the data 
control block for the opened ISAM data sat. 


a address-——RX-Type Address, (2-12), or (90) 
The area address operand specifies the address of the area 
that contains the record to be written (move mode only). 
Either move or iecate mode can be used with QISAM, but ti:ev 
must not be mixed within the specified data control block. 
be following describes operations for locate end move 
modes: 





Locate Mode: If locate mode is specified in the data 
control block, the area address operand must be omitted. 
The system returns the address of the next availabie buffer 
in register 1; this is the buffer into which the next 
record is placed. The secord is not written until anctiher 
PUT macro instruction 1s issued for the same data control 
block. The last record is written when a CLOSE macro 
instruction is issued to close the data set. 


Move Mode: If move mode has been specified in the data 
control block, the area address operand must specify the 
address in the problem program that contains the record &!s 
be written. The system moves the record from the area to 
an output buffer before control is returned. If the area 
address operand is omitted, the system assumes that 
register 0 contains the area address. 
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PUT ROUTINE EXIT 


> 
The error analysis CSYNAD) routine is given control if the Og 
output operation could not be completed satisfactorily. The el 


contents of the registers when the error analysis routine is 
given control are described in Appendix A, "Status Information 
Following an Input/Output Operation" on page 190. 
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PUT 


PUT“-WRITE NEXT LOGICAL RECORD (QSAM) 


The PUT macro instruction causes the system to write a record in 
a sequential data set. Various modes are available and are 
specified in the DCB macro instruction. In the locate mode, the 
address of an area within an output buffer is returned in 
register 1 after the macro instruction 1s executed. The user 
should subsequently construct, at this address, the next 
sequential record or record segment. The move mode of the PUT 
macro instruction causes a logical record to be moved into an 
output buffer. In the data mode, which is available only for 
variable-length spanned records, the PUT macro instruction moves 
oo ey the data portion of the record into one or more output 
uffers. 


The records are blocked by the control program (as specified in 
the data control block) before being placed in the data set. 

For undefined-length records, the DCBLRECL field determines the 
length of the record that is subsequently written. For 
variable-length records, the DCBLRECL field is used to locate a 
buffer segment of sufficient size Clocate mode), but the length 
of the record actually constructed is verified before the record 
is written (the output block can be filled to the maximum if, 
before issuing the PUT macro, DCBLRECL is set equal to the 
record length). For variable-length spanned records, the system 
segments the record according to the record length, buffer 
length, and amount of unused space remaining in the output 
buffer. The smallest segment created will be 5 bytes, 4 for the 
segment descriptor word plus 1 byte of data. 


If the ISCII/ASCII translation routines are included when the 
operating system is generated, translation can be requested by 
coding LABEL=(,AL) or €,AUL) in the DD statement, or it can be 
requested by coding OPTCD=Q in the DCB macro instruction or DCB 
subparameter of the DD statement. When translation is 
requested, all QSAM records whose record format CRECFM operand) 
is F, FB, D, DS, DB, DBS, or U are automatically translated from 
EBCDIC code to ISCII/ASCII code. For translation to occur 
correctly, all output data must be in EBCDIC code; any EBCDIC 
character that cannot be translated into an ISCII/ASCII 
character is replaced by a substitute character. 


The PUT macro is written: 


»yarea address 


—RX-Type Address, (2-12), or (1) 
The dcb address operand specifies the address of the data 
control block for the data set opened for output. 


—RX-Type Address; (2-12), or (0) 
The area address operand specifies the address of an area 
that contains the record to be written (move or data mode). 
The move, locate, or data mode can be used with QSAM, but 
they must not be mixed within the specified data control 
block. If the area address operand is omitted in the move 
or data mode, the system assumes that register zero 
contains the area address. The following describes the 
operation of the three modes: 


Locate Mode: If locate mode is specified, the area address 

operand must be omitted. The system returns the address of 
the next available buffer in register 1; this is the buffer 
into which the next record is placed. 


When variable-length spanned records are processed without 
the extended logical record interface (XLRI), and a record 
area has been provided for a logical record interface (LRI) 
CBFTEK=A has been specified in the data control block or a 
BUILDRCD macro instruction has been issued), the address 
returned in register 1 points to an area large enough to 
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PUT 


contain the maximum record size Cup to 32756 bytes). The 

system segments the record and writes all segments, jf 
providing proper control codes for each segment. If, for a J 
variable-length spanned records, an area has not been ie 
provided, the actual length remaining in the buffer will be 
returned in register 0. In this case, it is the user's 
responsibility to segment the records and process them in 

terms of record segments. ISO/ANSI/FIPS spanned records, 

RECFM=DS or RECFM=DEBS, may not be processed in segment 

mode. The record or segment is not written until another 

PUT macro instruction is issued for the same data control 

block. The last record is written when the CLOSE macro. 
instruction is issued. 


When a PUT macro instruction is used in the locate mode, 
the address of the buffer for the first record or segment 
is obtained by issuing a PUT macro after open. QSAM 
returns the address in register 1. The user then moves 
data to this address. The buffer is not written to the 
data set until the next PUT macro is issued. If records 
are blocked, the data is not written to the data set until 
the PUT following the one that filled the buffer. Each PUT 
macro will return the address’‘of the next buffer in 
register 1. After this address is given to the user, QSAM 
will always count this address as a valid record. The user 
should always place valid data at the address returned in 
register 1 before issuing another PUT or FEOV or CLOSE 
MACRO; otherwise, residual data at that location will be 
written to the data set. After an FEOV macro is issued, 
(for multivolume data sets), register 1 must be 
reinitialized with the first buffer address for the next 
volume by issuing a PUT macro after return from FEQV. 


Move Mode: If move mode has been specified in the data 
control block, the area address operand specifies the 
address of the area that contains the record to be written. 
The system moves the record to an output buffer before 
control is returned. 


Data Mode: If data mode is specified in the data control 
block (data mode can be specified for variable-length 
spanned records only), the area address operand specifies 
the address of an area in the problem program that contains 
the data portion of the record to be written. The system 
moves the data portion of the record to an output buffer 
before control is returned. The user must place the total 
data length in the DCBPRECL (not the DCBLRECL) field of the 
data control block before the PUT macro instruction is 
issued. 


Extended Logical Record Interface (XLRI): When the PUT 
macro is used with the extended logical record interface, 
the address returned in register 1 points to an area that 
is used to build a 4-byte logical record length field CRDW) 
followed by a complete logical record. The logical record 
length byte count occupies the three low-order bytes of the 
record length field and must include the length of the 
field. The high-order byte must be zero. The DCB LRECL 
value indicates the length of the longest logical record of 
the data set in 'K’ (€1024-byte) units. 


PUT ROUTINE EXIT 


If the output operation could not be completed satisfactorily, 
the error analysis (SYNAD) routine is given control after the 
next PUT instruction is issued. The contents of the registers 
when the error analysis routine is given control are described 
in Appendix A, "Status Information Following an Input/Output 
Operation" on page 190. 
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PUTX 


PUTX"-~WRITE A RECORD FROM AN EXISTING DATA SET (QISAM AND QSAM?} 


PUTX ROUTINE EXIT 


The PUTX macro instruction causes the control program to return 
an updated record to a data set (QISAM and QSAM) or to write a 
record from an input data set into an output data set (QSAM 
only). There are two modes of the PUTX macro instruction. The 
output mode (QSAM only) allows writing a record from an input 
data set ona different output data set. The output data set 
may specify the spanning of variable-length records, but the 
input data set must not contain spanned records. 


The update mode returns an updated record to the data szt from 
which it was read. The logical records are blocked by the 
control program, as specified in the data control block, before 
they are placed in the output data set. The control program 
uses the length specified in the DCBLRECL field as the length of 
the record currently being stored. Control is not returned to 
the a program until the control program has processed the 
record. 


For SYSIN or SYSOUT data sets, the PUTX macro instruction can be 
used only in the output mode. 


The PUTX macro is written: 


»sinput deb address 


cdch address-——RX-Type Address, (2-12), or (1) 
The dcb address operand specifies the address of the data 
control block for a data set opened for output. 


—RX-Type Address, (2-12), or (0) 
The input dcb address operand specifies the address of a 
data control block opened for input. The PUTX macro 
instruction can be used for the following modes: 


Output Mode: This mode is used with QSAM only. The input 
dcb address operand specifies the address of the data 
control block opened for input. If this operand is 
omitted, the system assumes that register 0 contains the 
input dcb address. 


Update Mode: The input dcb address operand is omitted for 
update mode. 


The error analysis (SYNAD) routine 1s given control if the 
operation is not completed satisfactorily. The contents of the 
registers when the error analysis routine is given control are 
described in Appendix A, "Status Information Following an 
Input/Output Operation™ on page 190. 
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READ 
READ-—READ A BLOCK (BDAM) 


The READ macro instruction causes a block to be retrieved from a e 
data set and placed in a designated area of storage. Control ; 
may be returned to the problem program before the block is 
retrieved. The input operation must be tested for completion 
using a CHECK or WAIT macro instruction. A data event control 
block, shown in Appendix A, "Status Information Following an 
Input/Output Operation™ on page 190, is constructed as part of 
the macro expansion. 


Ney A 


The standard form of the READ macro instruction is written as 
follows (the list and execute forms are shown following the 
descriptions of the standard form): 





decb name—symbol 
The decb name operand specifies the name assigned to the 
data event control block created as part of the macro 
expansion. 


type""{DITFIXIIR|RUI} 
{DKCFIXICER|RUI} 
The type operand is coded in one of the combinations shown 
above to specify the type of read operation and the 
optional services performed by the system: 


specifies that the data and key, if any, are to be 
read from a specific device address. The device 
address, which can be designated by any of the three 
pine as methods, is supplied by the block address 
operand. 


DK | 
specifies that the data Conly) is to be read from a 
device address identified by a specific key. The key 
to be used as a search argument must be supplied in 
the area specified by the key address operand; the 
search for the Key starts at the device address 
supplied in the area specified by the block address 
operand. The description of the DCB macro 
instruction, LIMCT operand, contains a description of 
the search. : 


requests that the system provide block position 
feedback into the area specified by the block address 
operand. This character can be coded as a suffix to 
DI or DK as shown above. 


requests exclusive control of the data block being 
read, and that the system provide block position 
feedback into the area specified by the block address 
operand. The descriptions of the WRITE and RELEX 
macro instructions contain a description of releasing 
a data block that is under exclusive control. This 
character can be coded as a suffix to DI or DK as 
shown above. 
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requests that the system provide next address feedback 
into the area specified by the next address operand. 
When R is coded, the feedback is the relative track 
address of the next data record. This character can 
be coded as a suffix to DI or DK, DIF, BIX, DKF, or 
DKX as shown above, but can be coded only for use with 
variable-length spanned records. 


RU | 
requests that the system provide next address feedback 
into the area specified by the next address operand. 
When RU is coded, the feedback is the relative track 
address of the next capacity record (RO) or data 
record whichever occurs first. These characters can 
be coded as a suffix to DI, BK, DIF, DIX, DKF, or DKK, 
but it can be coded only for use with variable-length 
spanned records. 


—-A-Type Address or (2-12) 
The dcb address operand specifies the address of the data 
control block opened for the data set to be read 


—A-Type Address, (2-12), or 'S' 
The area address operand specifies the address of the area 
in which the data block is to be placed. If ‘'S' is coded 
instead of an address, dynamic buffering is requested 
(dynamic buffering must also be specified in the MACRF 
operand of the DCB macro instruction). When dynamic 
buffering is used, the system acquires a buffer and places 
its address in the data event control block. 


lenath—symbol, decimal digit, absexp, (2-12), or ‘'S§' 


The length operand specifiés the number of data bytes to be 
read up to a maximum of 32760. If 'S' is coded instead of 
a length, the number of bytes to be read is taken from the 
data control block. If the length operand is omitted for 
format-U records, no error indication is given when the 
program is assembled. However, the problem program must 
insert a length into the data event control block before 
the read is issued. 


key address—A-Type Address, (2-12), 'S'", or 0 


The key address operand specifies the address of the area 
for the key of the desired data block. If the search 
operation is made using a key, the area must contain the 
key. Otherwise, the key is read into the designated area. 
If the key is read and 'S' was coded for the area address, 
'S' can also be coded for the key address; the key and data 
are read sequentially into the buffer acquired by the 
system. If the key is not to be read, specify 0 instead of 
an address or 'S', 


—A-Type Address or (2-12) 
The block address operand specifies the address of the area 
containing the relative block address, relative track 


address, or actual device address of the data block to be 


retrieved. The device address of the data block retrieved 
is placed in this area if block position feedback is 
requested. The length of the area that contains the 
address depends on whether the feedback option COPTCD=F) 
has been specified in the data control block and if the 
READ macro instruction requested feedback. 


If OPTCD=F has been specified, feedback Cif requested) is 
in the same form as originally presented by the READ macro 
instruction, and the field can be either 3 or 8 bytes long, 
depending on the type of addressing. 


If OPTCD=F has not been specified, feedback Cif requested) 


is in the form of an actual device address, and the field 
must be 8 bytes long. 
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—A-Type Address or (€2-12) 
The next address operand specifies the address of the 
storage area in which the system places the relative 
address of the next record. The length operand must be 
specified as "S'. When the next address operand is 
specified, an R or RU must be added to the type operand 
(for exampie, DIR or DIRU). The R indicates that the next 
address returned is the next data record. RU indicates 
that the next address returned is for the next data or 
capacity record, whichever occurs first. The next address 
operand can be coded only for use with variable-length 
spanned records. 
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READ“""READ_A BLOCK OF RECGRDS (BISAM) 


fhe READ macro instruction causes ar: unbklocked record, or a 
block containing a specified logical record, to be retrievad 
from a data set. The biock is placed in a designated area of 
storage; and the address of the logical recoard is placed in the 
data event controi block. The data event control block is 
constructed as part of the macro expansion and is described in 
Appendix A, "Status Information Following an Input/Gutput 
Operation™ on page 190. 


Control may be returned to the problem program before the block 
is retrieved. The input operation must be tested for completien 
using a WAIT or CHECK macro instruction. 


The standard form of the READ macro instruction is written as 
follows for BISAM (the jist and execute forms are showr 
following the descriptions of the standard form): 








[symbol]| READ decbh name 


s{lencthi'S'} 
6a teas ee 


dech name——symbol 
The decb name operand specifies the name assigned to the 
data event control block (DECB) created as part of the 
macro expansion. 


type-——{K! KU} | 
The type operanc is coded as shown te specify the type of 
read operation: 


K 
specifies normal retrieval. 


KU | 
specifies that tne record retrieved is to be updated 
and returned to the data sat; the system saves the 
device address to be returned. 


When an ISAM data set is being updated with a READ Kt 
macro instruction and a WRITE K macro instructicn, 
both the READ and WRITE macro instructions must 
refesence the same data event control block. This 
update operation can be perfermed by using @ list-for:s 
instruction to create the list (data event contrel 
wlock) and by using the axecute form ef the READ and 
WRITE macro instructions to refarence the same list. 


—A-Type Address es (2-12) 
The dcb address operand specifies the address of tne data 
control block for the opened data set to be read. 


area address—A-Type Address, (2-12), or 'S' 
The area address operand epee tics the address of the area 
ir; which the data block is placed. The first i6 Eytes of 
this area are used by the system ard do net contain 
information from the data block. The grea address must 
specify a different area than the key address. Dynamic 
buffering is specified hy coding ‘S' instead of an ahheraad 
the address of the acquired storage area is returned in th 
data event contrel block. Indexed sequential buffer end 
work area requirements are described in Data Admi strati 
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lenath—~symbol, decimal 
The length operand 

up to a maximum of 
length, the number 
count field of the 

' coded. 


dicix: absexp, (2-12), or 'S! 


specifies the number of bytes to be head 


32760. If 'S' is coded instead of a 
of bytes to be read is taken from the 
record; for blocked records, 'S' must be 


—-A-Type Address or (2-12) 
The key address operand specifies the address of the area 
in the problem program containing the key of a logical 
record in the block that is to be retrieved. When the 


input operation is 


completed, the storage address of the 


logical record is placed in the data event control block. 
The key address must specify a different area than the area 


address. 
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READ 
READ“—READ A BLOCK (BPAM AND BSAM) 


( | The READ macro instruction causes a block to be retrieved from a 
data set and placed in a designated area of storage. Control 
may be returned to the problem program before the block is 
retrieved. The input operation must be tested for completion 
uSing a CHECK macro instruction. A data event control block, 
shown in Appendix A, "Status Information Following an 
Input/Output Operation" on page 190, is constructed as part of 
the macro expansion. 


If the OPEN macro instruction specifies UrDAT, both the READ and 
WRITE macro instructions must reference the same data event 
control block. (See the list form of the READ or WRITE macro 
instruction for a description of how to construct a data event 
control block; see the execute form of the READ or WRITE macro 
instruction for a description of how to modify an existing data 
event control block.) 


The standard form of the READ macro instruction is written as 
follows (the list and execute forms are shown following the 
descriptions of the standard form instructions): 





I £symbol]] READ 





—symbol 
The decb name operand specifies the name assigned to the 
data event control block CDECB) created as part of the 
macro expansion. 


type-——{SF| SB} 
The type operand is coded as shown to specify the type of 
read operation: 


SF 





specifies normal, sequential, forward retrieval. 


SB 
specifies a read-backward operation; this operand can 
be specified only for magnetic tape with format-F or 
format-U records. 


This operand is intended to be used when the data set 
is OPEN for RDBACK. Tape positioning, label 
processing, and volume mounting errors will occur 
during EOV and CLOSE if an OPEN option, other than 
RDBACK, 1s used. 


—A-Type Address or (2-12) 
The dcb address operand specifies the address of the data 
control block for the opened data set to be read. 


—A-Type Address or (2-12) 
The area address operand specifies the address of the 
problem program area in which the record is placed. When a 
READ SB macro instruction is issued, the area address must 
be the address of the last byte of the area into which the 
record is read. If the data set contains keys, the key is 
read into the buffer followed by the data. 


length—symbol, decimal digit, absexp, (2-12), or ‘'S' 
The length operand specifies the number of data bytes to be 
read, to a maximum of 32760. If the data is translated 
co | from ISCII/ASCII code to EBCDIC code, the maximum number of 
( | bytes that can be read is 2048. For format-U records, 'S' 
or a valid length must be coded. The number of bytes to be 
read is taken from the data control block if 'S' is coded 
instead of a number. (This operand is ignored for format-F 
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or format-V records.) For format-D records only, the 


length of the record just read is automatically inserted ae 
into the DCBLRECL field by the check routine if BUFOFF=CL) LG 
is not specified in the data control block. Sa 
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e QKEAY Y A YY PVA VALB LAN SDA 


The READ macro instruction causes a block to be retrieved from a 
data set and placed in a designated area of storage. The data 
set is a BDAM data set and its record format is unblocked 
variable-length spanned records. BFTEK=R must be specified in 
the data control block. Control may be returned to the problem 
program before the block is retrieved. The input operation must 
be tested for completion using a CHECK macro instruction. 

data event control block, shown in Appendix A, "Status 
Information Following an Input/Output Operation™ on page 190, is 
constructed as part of the macro expansion. 


The standard form of the READ tracro instruction is written as 
follows (the list and execute forms are shown following the 
descriptions of the standard form): 





—syinbol 
The decb name operand specifies the name assigned to the 
data event control block (CDECB) created as part of the 
macro expansion. 


SF 
specifies normal, sequential, forward retrieval. 


—A-Type Address or (2-12) 
The dcb address operand specifies the address of the data 
control block for the opened BDAM data set to be read. 


~——A-Type Address or (2-12) 
The area address operand specifies the address of the area 
in which the record is placed. 


When a spanned BDAM data set is created with keys, only the 
first segment of a record has a key; successive segments do not. 
When a spanned record is retrieved by the READ macro 
instruction, the system places a segment in a designated area 
addressed by the area address operand. The problem program must 
assemble all the segments into a logical record. Because only 
the first segment has a key, the successive segments are read 
into the designated area offset by key length to ensure that the 
block-descriptor word and the segment-descriptor word are always 
in their same relative positions. 
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The list form of the READ macro instruction is used to construct CO 
a data management parameter list in the form of a data event pe 
control block (DECB). For a description of the various fields 

of the DECB for each access method, see Appendix A, "Status 

Information Following an Input/Output Operation" on page 190. 


The description of the standard form of the READ macro 
instruction provides the explanation of the function of each 
operand. The description of the standard form also indicates 
the operands used for each access method, and the meaning of 'S' 
when coded for the area address, length, and key address 
operands. For each access method, 'S' can be coded only for 
those operands for which it can be coded in the standard form of 
the macro instruction. The format description below indicates 
the optional and required ocperands in the list form only. 


The list form of the READ macro is written: 





decbh_name—symbol 
tyvpe—Code one of the types shown in the standard form | 
dcb address—A-Type Address a 
area address—A-Type Address or 'S' - 
length—symbol, decimal digit, absexp, or 'S' 
key address—A-Type Address or 'S' 
block address—A-Type Address 
next address—A-Type Address 
MF=L—-Coded as shown 

The MF=L operand specifies that the READ macro instruction 


is used to create a data event control block that can be 
referenced by an execute-form instruction. 
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A remote data management parameter list (data event control 
block) is used in, and can be modified by, the execute form of 
the READ macro instruction. The data event control block can be 
generated by the list form of either a READ or WRITE macro 
instruction. 


The description of the standard form of the READ macro 
instruction provides the explanation of the function of each 
operand. The description of the standard form also indicates 
the operands used for each access method and the meaning of ‘'S* 
when coded for the area address, length, and key address 
operands. For each access method, 'S" can be coded only for 
those operands for which 1t can be coded in the standard form of 
the macro instruction. The format description below indicates 
the optional and required operands in the execute form only. 


The execute form of the READ macro is written: 





dech address—-RX-Type Address or (2-12) 
type——Code one of the types shown in the standard form 
ddress-—RX-Type Address or €2-12) 
jress-——RX-Type Address, (2-12), or °S' 










decimal digit, absexp, (2-12), or ‘S* 
address-——-RX-Type Address, (2-12), or ‘*S' 
ydress-—-RX~-Type Address, or (2-12) 
address-—-RxX-Type Address or (2-12) 


MF=E—Coded as shown 
The MF=E operand specifies that the execute form of the 
READ macro instruction is used, and that an existing data 
event control block (specified in the dech address operand) 
is used by the access method. 
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The RELEX macro instruction causes release of a datz block from 
exclusive control. The block must have been requested in an 
earlier READ macro instruction that specified either DIX er DK. 


Note: A WRITE macro instruction that specifies either DIX or 
DKX can also be used to release exclusive control. 


The RELEX macro is written: 





specifies direct access. 


—RX-Type Address, (2-12), or (1) 
The dcb address operand specifies the address of the data 
control block for a BDAM data set opened for processing. 
The operand must specify the same data control block 
designated in the associated READ macro instruction. 


—RX-Type Address, (2-12), or (0) 
The block address operand specifies the address of the area 
containing the relative block address, relative track 
address, or actual device address of the data block heing 
released. The operand must specify the same area 
designated in the block address operand of the associated 
READ macro instruction. 


COMPLETION CODES 


When the system returns control to the problem program, the 
low-order byte of register 15 contains one of the following 

At My codes; the three high-order bytes of register 15 are set 
o 


Return 
Code (15) Meaning 


00 (X*'00') Operation completed successfully. 


04 (X'04°) The specified data block was not in the 
exclusive control list. 


08 C(X'08") The relative track address, relative 


block address, or actual device address 
was not within the data set. 
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RELSE 


The RELSE macro instruction causes immediate release of the 
current input buffer. The next GET macro instruction retrieves 
the first record from the next input buffer. For 
variable-length spanned records (QSAM), the input data set is 
spaced to the next segment that starts a logical record ina 
subsequent block. Thus, one or more blocks of data or records 
may be skipped. The RELSE macro instruction is ignored if a 
buffer has just been completed or released, if the recerds are 
unblocked, or if issued for a SYSIN data set. 


The RELSE macro is written: 
| Esymbol] | RELSE dch address 


—RX-Type Address, (2-12), or (1) 
The dcb address operand specifies the address of the data 
control block for the opened input data set. 
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SEQUENTIAL RETRIEVAL (GQISAM INPUT) 


The SETL macro instruction causes the control program to start 
processing the next input request at the specified record or 


device address. 


Sequential retrieval of records using the GET 


macro instruction continues from that point until the end of the 


data set 
issued. 


is encountered or a CLOSE or ESETL macro instruction is 
An ESETL macro instruction must be issued between SETL 


macro instructions that specify the same data set 


The SETL macro instruction can specify that retrieval is to 


start at the beginning of th 


e data set, at a specific address on 


the device, at a specific record, or at the first record of a 


specific class of records, 
functions, see Data n1LN 





For. ade ss ons* information on SETL 





The following operands are coded as shown; 


s--RX-Type Address, (2-12), or (13 
The dcb address operand specifies the address of the data 
control block opened for the indexed sequential data set 
being processed. 


starting point and type of retrieval 


K 


KC 


KD 


KCD 


specifies that the next input operation is 
record containing the key specified in the 
address operand 


specifies that the next input operation is 
first record of the key class specified in 


they specify the 


to begin at the 
lower-Limit 


to begin at the 
the lower-limit 


address operand. If the first record of the specified key 
class has been deleted, retrieval begins at the next 


nondeleted record regardless of key class. 


used with either K or KDB, specifies that, 


if the key in the 


lower-~limit address operand is not in the data set, 


retrieval begins at the next higher key. 


The character H 


cannot be coded with the key class operands (KC and KCD). 


specifies that the next input operation is 
record containing the Key specified in the 
address operand, but only the data portion 
retrieved. This operand is valid only for 
records. 


specifies that the next input operation is 
first record of the key class specified in 
address operand, but only the data portion 
retrieved. This operand is valid only for 
records. 


to begin at the 
lower~limit 

of the record is 
unblocked 


to begin at the 
the lower-limit 
of the record is 
unblocked 


specifies that the next input operation is to begin with 
the record at the actual device address specified in the 


lower-limit address operand. 
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ID 





SETL 


specifies that the next input cperation is to begin with 
the record at the actual device address specified in the 
lower-~limit address operand, but only the data portion of 
the record is retrieved. This operand is valid only for 
unblocked records. 


specifies that the next input operation is to begin with 
the first record in the data set. 


specifies that the next input operation is to begin with 
the first record in the data set, but only the data portion 
is Pe This operand is valid only for unblocked 
records. 


—RX-Type Address, (2-12), or (0) 
The lower-limit address operand specifies the address of 
the area containing the key, key class, or actual device 
address that designates the starting point for the next 
input operation. If I or ID has been specified, this area 
must contain the actual device address (Cin the form 
MBBCCHHR) of a prime data record; the other types require 
that the key or key class be contained in this area. 


The error analysis (CSYNAD) routine is given control if the 
operation could not be completed successfully. The exception 
condition code and general registers are set as shown in 
Appendix A, "Status Information Following an Input/Output 
Operation” on page 190. If the SETL macro instruction is not 
reissued, retrieval starts at the beginning of the data set. 
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SETPRT 
SETPRTI-~PRINTER SETUP (BSAM, QSAM, AND EXCP) 
ya 


For the IBM 3800 Printing Subsystem, the SETPRT macro eo 
instruction is used to initially set or dynamically change the a 
printer control information. The following control information 

may be changed with the SETPRT macro: 


e Bursting of forms (BURST parameter) 

e Character arrangements to be used (CHARS parameter) 
e The number of copies (COPIES parameter) 

e The starting copy number (COPYNR parameter) 

° Vertical formatting of a page (FCB parameter) 

e Flashing of forms CFLASH parameter) 


& Initializing the printer control information CINIT 
parameter ) 


e Modification of copy (MODIFY parameter) 
e Blocking or unblocking of data checks COPTCD parameter) 


In addition to changing the control information, you can also do 
the following: 


e Create your own 3800 load modules ina library to replace 
the use of SYS]1.IMAGELIB CLIBDCB parameter). 


@ SETPRT error messages that are sent to the printer can also 
be passed back to the invoking program (MSGAREA parameter). 


e Print or suppress error messages on the printer CPRIMSG 
parameter). 


e Control the scheduling of SYSOUT segment printing CDISP 
parameter). 


To use all-points addressability when operating the 3800 Model 
3, PSF libraries (for example, SYS1.FONTLIB, SYS1.FDEFLIB, 
SYS1.PDEFLIB) will be used instead of SYS].IMAGELIB. As an 
alternative, the library with the LIBDCB parameter may be used. 


For additional information on how to use the SETPRT Inacro 
instruction with the 3800 Model 3, see 


For printers other than the 3800 Printing Subsystem, the SETPRT 
macro instruction is used to control the following: 


e Selection and verification of UCS and FCB images CUCS and 
FCB parameters) 


® Blocking or unblocking of data checks (COPTCD parameter) 


® Printing lowercase EBCDIC characters in uppercase (OPTCD and 
UCS parameters) 


For printers that have a universal character set (UCS) buffer or 
a forms control buffer (FCB), the SETPRT macro instruction is 
used to fetch UCS and FCB images from the image library 
CSYS]1.IMAGELIB) and load them into their respective buffers. 
Note that FCB images for the 3203/3211 and 3800 are not 
compatible. The universal character sets for the 1403/3203 and 
the character arrangement table modules for the 3800 are also 
not compatible. 


IBM-supplied UCS images, FCB images, and character arrangement 
table modules are included in SYS]1.IMAGELIB at system generation 
time. For impact printers, user-defined character sets and 
forms control images can be added to SYS]1.IMAGELIB as described 
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in System—-Data Administration. Fer the 3800, user-defined 
character arrangement table modules, ccepy modification modules, 
FCB modules, and graphic character modification modules (that 
modify the character set) and labrary character sets can be 
added to SYSI]1.IMAGELIB as described in Wtilities. The EXLST 
parameter of the DCB macro instruction can be used to specify 
the address of an FCB module in storage. 


For the 1403 and 3211, if tne specified USCS or FCB image cannot 
be found in SYSi.IMAGELIB or the DCB exit list, the system 
operator is asked to specify a replacement name and can 
therefore override an error made by the program. For the 3800, 
the SETPRT routines never ask the operator to replace or 
respecify a parameter from the SETPRT macro, and SETPRT 
procesSing is terminated. 


When BSAM is being used, all write operations must be checked 
for completion before the SETPRT macro instruction is issued; 
any incomplete write operations are purged. Issuing the SETPRT 
macro instruction for a device other than an on-line UCS printer 
or the 3800 Printing Subsystem results in an error return code. 


A permanent error on a SETPRT macro will cause one or bcoth of 
the first two bits uf the DCBIFLGS field to be set cn, 
indicating an error. A cancel key er system-restart-required 
paper jam will cause the lost data imdicator bit, DCBIFLDT, to 
be set in the DCBIFLGS field. Before reissuing a SETPRT macro, 
these bits must be reset to zero. 


The standard form of the SETPRI macrse instruction is written as 
follows (the list and execute forms are shown following the 
standard form): 


C[symbol]/SETPRT|] dcbaddr 

[»,BURST={N i Vi] 

[,CHARS={namelAladdress)|R(Cregister J}} 
{i Coame | Aladdres s)] 

Ry ee ter)},... JF] 

COPIES=numb al 











[, 
[,COPYNR=number} 
Lis DISP= ESCHEDUYE |NOSCHEDULE | EXTERNAL] 
{> dA | > JiR eee 





Te Sertes Tat aT VSTE 
FLASH= “thames 


L > 
{€Ename!l>count 
[> INIT={N|Y32 
[,LIBDCB=dcbaddress] 
[,MODIFY= “{Cfname | Ataddres 












[> MSGAREA=address] 
[,OPTCD={B/U} 
C({BIU},£F]U2 331 
[»>PRTMSG=C€NIYI 
[,REXMIT={N|¥}1 
[L,UCS={csc} 
“tlese, fF LFV FIV} ISI 


—A-Type Address or (2-12) 
The dcbaddr operand specifies the address of the data 
control block for the data set to be printed; the data set 
must be opened for output before the SETPRT macro 
instruction is issued. 


BURST={NIY} 
The BURST operand specifies whether the paper output is to 
be burst. BURST=Y indicates that the printed output is to 
be burst into separate sneets and stacked. BURST=N 
indicates that the printed sutput is to go into the 
continuous forms stacker. If BURST ais not specified, the 
SETPRT routine assumes BURST=N. If bursting is requested, 
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the printed output is threaded into the burster-trimmer- 
stacker. Otherwise, the printed output is threaded into the 
continuous forms stacker. The operand causes a message to 
be printed at the system console telling the operator to 
thread the paper again if needed. This operand is valid 
for the 3800 printer only. , 


CHARS= {name|ACaddress IR (register )} 
{({namelAladdress)|R(register)},...)} 
The CHARS operand specifies one to four character 
arrangement tables to be used when printing a data set. 
This operand is valid for the 3800 printer only. 


hame 
is the last four characters of the 8-byte member name 
for a character arrangement table module. For 
information on tthe modules available, see JBM 3800 
Printing Subsystem Programmer's Guide. 3 


Aladdress) 
specifies an in-storage address of the user-provided 
character arrangement table module. For information 
on the format of the module, see Utilities. 


R(register ) 
specifies the register that wenkatne: an in-storage 
address of the user-provided character arrangement 
table module. For information on the format of the © 
module, see Lliti ‘ 


COPIES=number 
specifies the total number of copies of each page of the 
\ data set that is to be printed (from 1 to 255) before going 
my to the next page. If the COPIES operand is omitted, one 
copy of each page is printed. This operand is valid for 
the 3800 printer only. 


DISP={SCHEDULE | NOSCHEDULE | EXTERNAL} 
DISP allows you to control how JES disposes of the data 
that is created before the SETPRT request. This parameter 
is valid only for SYSOUT data sets and is ignored for the 
direct user who issues SETPRT. You may abbreviate the 
parameters to S, N, and E, respectively. This operand is 
valid for the 3800 printer only. 


SCHEDULE 
specifies that JES is to schedule the previous data 
for printing immediately. 


NOSCHEDULE 
specifies that JES is to separate the data into a 
separate JES data set and to schedule the previous 
data set for printing after the job terminates. 


specifies that the schedule of the data set for 
printing is determined by the JCL parameter 
FREE=CLOSE. FREE=CLOSE is the same as specifying 
DISP=SCHEDULE. The absence of FREE=CLOSE in the JCL 
is the same as coding DISP=NOSCHEDULE on the SETPRT 
macro. EXTERNAL is the default. 


FCB= fimageid| Ar address) |R( register )} 
{({imageid|lAladdress)1R( register )},{V1A})} 
The FCB operand specifies that the forms control buffer 
CFCB) is to be selected from the image library. When the 
FCB operand is specified, the OPTCD operand can also be 
specified. The possible specifications are: 


a | 
specifies the forms control image to be loaded. A 
forms control image is identified by a l- to 
4-character name. IBM-supplied 3211 format images are 
identified by imageid value of STD1 and STD2; 
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user-designed forms control images are defined by the 
installation. For descriptions of the standard forms 
control images for the 5203 and 3211, see System—Data 

For more information about 3800 FCB 
modules, see , 


Aladdress) 
The address subparameter specifies an in~storage 
address of the user-supplied forms control buffer 
module to be used. (For information on the format of 
the module, see Utilities.) This subparameter is 
valid for the 3800 Model 1 printer only. 


R(register ) 
The register subparameter specifies the register that 
contains an in-storage address of the user-provided 
forms control buffer module to be used when printing a 
data set. (For information on the format of the 
module, see Utilities.) This subparameter 1s valid 
for the 3800 Model 1 printer only. 


V or VERIFY 
requests that the forms control image be displayed on 
the printer for visual verification. This operand 
allows forms verification and alignment using the WTOR 
macro instruction. 


A or ALIGN 
allows forms alignment using the WTOR macro 
instruction. This subparameter will be ignored if 
specified for the 3800 printer. 


FLASH={name} | 
{(Cnamel,count)} 

The FLASH operand identifies the forms overlay frame to be 
used. Unless REXMIT=Y is coded and the forms overlay frame 
is still in use from the previous SETPRT macro issuance, a 
message tells the operator to insert this forms overlay 
frame into the printer. This operand also enables you to 
specify the number of copies on which the overlay is to be 
printed (flashed). If this operand is omitted, flasluing 
ceases. This operand is valid for the 3800 printer only. 


is the l1- to 4-character name of the forms overlay 
frame. 


count . 
indicates the total number (0 to 255) of copies of 


each page of the data set on which the overlay will be 
printed, beginning with the first copy. The number of 
copies printed will not be greater than the number of 
copies specified by the COPIES operand. No copies 
will be flashed if the count of zero is specified. If 
@ nonzero count is specified and the name of the forms 
overlay frame is omitted, the operator will not be 
requested to insert a frame. Whatever frame is 
inserted will be used. 


INIT= ENIY? 

INIT=Y will initialize the control information in the 3800 
printer with a folded character arrangement table, the 
LO-pitch Gothic character set (12 pitch for the 3800 Modei 
3), and a six lines per inch FCB corresponding to the forms 
Size in the printer. COPIES and COPYNR will be initialized 
to 1, FLASH and MODIFY will be initialized to none, and 
BURST will be initialized to N (continuous forms). For 
INIT=N, all control information for the 3800 printer will 
remain unchanged. Any parameters included on the same 
macro statement as the INIT operand will be processed after 
printer initialization has been completed. This operand is 
valid for the 3800 printer only. 
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LIBBCB-dchaddress-—A-Type Address or (2-12) 
dcbaddress is the address of an authorized user library DCB — 
that has been cpened, and that you want to use instead of ff _ 
SYS].IMAGELIB. If LIBDCB is not specified, SYS1.IMAGELIB ey’ 
is used. This operand is valid with 3800 Model 1 only. ~ 





Note: Thais is for the user with direct control of the 3803 
Model 1 


MODIFY= fname lAtaddress)iR (reaister) } 
{( {name !Aladdressi|R( register }},tre)} 
The MODIFY operand identifies the copy modification woduke 
and an associated character arrangement table module to be 
used when modifying the data to be printed. This operand 
is valid for the 3800 Model 1 printer only. 


name 
A i- to G-character name of the copy modification 
module stored in SYS].IMAGELIB. These one to four 
characters are the last characters of the &@-byte 
member name of a copy modification module in 
SYS1.IMAGELIB. 


Afaddress!} 
The address subparameter specifies an in-storage 
address of the user-supplied copy modification medule. 
This subparameter is valid for the 3890 Model 1 
printer only. For information on the format of the 


module, see Utilities. 


R(register ) 
The register subparameter specifies a registers that 
contains an in-storage address of the user-providecd 
copy modification module. This subparameter is valid 
for the 3800 Model 1 printer only. | For information on 
the format ot the module, see i : 


specifies the table reference character used to select 
one of the character arrangement table modules to be 
used for the copy modification text. The values of 0; 
1, 2, and 3 correspond to the order in which the 
module names have been specified in the CHARS operand. 
If tre is not included, the first sharacter 
arrangement table module (0) is assumed. 


MSGAREA=address-—A-Type Address or (2-12) 
address is the address of the messace feedback area. This 
area is used to transfer message tiext between the SETPRT 
macro and the caller. You must allow at least 80 bytes for 
the massage text plus 10 bytes for prefix information or »e 
total length of at least 95 bytes. The message is 
truncated if it does not fit into the area. This operand 
is valid with 3800 only. The followirg shows the layout of 
the message area: 


bytes 
bytes 


0- total length 
27 
byres 6- 
8 
1 


reserved 

text length 

reserved 
varrabie: message text 


bytes 
bytes 


i oN 


0 

OPTCD={B/U} 
{({B]U},f£F LU} )} 
The OPTCD operand specifies whether printer data checks are 


blocked or unblocked and if the printer is to operate in 
fold or normal mode. The pessible specifications ara: 


B 
specifies that printer data checks are blocked; this _ 
peta updates the DCBOPTCD field of the data controi f 
block. ae 
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U 
specifies that printer data checks are unblocked; this 
option updates the DCBOPTCD field of the data control 
block. 

F or FOLD 


specifies that printing 1s in fold mode. This 
subparameter 18S ignored if specified for the 1403 or 
3800 printer. For 1903 fold mode, use fold option 
under the UCS operand. 


U or UNFOLD 
specifies that printing is in normal mode; this 
operand causes fold mode to revert to normal mode. 
This subparameter will be ignored if specified for the 
1403 or 3800 printer. 


PRTMSG={NIY} 
PRTMSG allows printer error messages to be printed for the 
programmer on the 3800. This operand is valid with 3800 
only. 


N 
specifies not to print error messages on the 3800. 


Y 


specifies to print error messages on the 3800. Y is 
the default. 


REXMIT={NIY} 
The specification of REXMIT=Y allows modification of the 
starting copy number CCOPYNR), the number of copies of the 
pages ina data set to be printed (COPIES), the forms 
overlay frame to be used (FLASH), and the number of copies 
to be printed (FLASH) without changing the other control 
information already set up in the printer. The SETPRT SVC 
will ignore all other parameters in the parameter list. 


UCS={csc} 
{(cse,s{FIF,»VIV})} 

The UCS operand specifies that the UCS buffer is to be 
loaded from the image library. When the UCS operand is 
specified, the FCB and OPTCD operands can also be 
specified. This operand will be ignored if specified for 
the 3800 printer. The possible specifications are: 


esc (character set code) 
The csc operand specifies the character set selected. 
A character set is identified by a l- to 4%-character 
rere Codes for standard IBM character sets are as 
ollows: 


1403 or 3203 Printer: AN, HN», PCAN, PCHN, PN, QN, QNC> 
RN» SN» TN» XN» and YN 


3211 Printer: All, H11, G11, Pll, and Til 


For descriptions of the standard IBM character sets, 
see System Generation; codes for user~designed 
character sets are defined by the installation. For 
rp daa on adding user~defined entries to an image 
able, see System-Data Administration. 





F or FOLD 
specifies that the character set image selected is to 
be in fold mode. The fold mode translates the EBCDIC 
code for lowercase characters to the EBCDIC code for 
the corresponding uppercase characters. 


V or VERIFY 
requests that the character set image be displayed on 
the printer for visual verification. 
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RETURN CODES 


After the SETPRT macro aneteuet ion is @xaeGrea. a peLUER cade is a 
placed in register 15, and control is returned to the i 
instruction following the SETPRT macro instruction. The — — 
illustration below shows how the four bytes of register 15 are 

used for. a specific printer. ‘ 


Byte = 0 PO te Be 3 
| | 3800 Code | ; 


Vaused | Other than] FCB Code | UCS Code 
FC | | 





Bit 0 78 1516 ~5>— 23 24 31 


The return codes in the figures that follow are in hexadecimal. 
e Return codes 0 through 14 apply to a specific printer. 

e Return codes 18 through 24 apply to all printers. 

@ Return codes 28 through 50 apply to the 3800 printer only. 


Figure 1 shows the hexadecimal return codes 00. through 14 for 
specific printers. An "XX" in the columns labeled '3800 Code 
Other than FCB* or 'FCB Code," means that a nonzero code may be 
in that byte. 


3800 Code | | 

Other than | | - 3 7 . 
FCB | FCB Code | UCS Code | : > e | an~ 
(Byte 1) | (Byte 2) | (Byte 3) | Meaning | ; 


successful completion. 


The onarater canceled the UCS aquest 7 the 
Following reason: 


o. The UCS image sound not be found in 
- SYS1.IMAGELIB. 


For non-3800 printers, the aperator canceled | 
| the FCB load operation for one of the : 
| following reasons: 


® The form could not be aligned to natch 
the buffer. 


The FCB module could not be found in 
ee ~IMAGELIB or the user's DCB exit 
is | 


For a 3800, the engeitied FCB module could 

not be found in SYS]1.IMAGELIB, a user 

library, or the DCB exit list, and SETPRT 
processing was terminated. : 





Figure 1 (Part 1 of 3). SETPRT Return Codes for ‘Specific pengers 
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7 3800 Code 

a Other than 

| FCB FCB Code UCS Code 
(Byte 1) (Byte 2) (Byte 3) 


The 3800 SETPRT processing was suspended for 
one of the following reasons: 


e A character arrangement table module 
could not be found in SYS1.IMAGELIB or a 
user library. 


A copy modification module could not be 
found in SYS1.IMAGELIB or a user library. 


A graphic character modification module 
(required by a character arrangement 
table module) could not be found in 
SYS1.IMAGELIB or a user library. 


A library character set module could not 
be found in SYS1.IMAGELIB or a user 
library. 





Register 0 contains a reason code identifying 
which of the above conditions occurred. 


For an explanation, see Figure 3 on page 155. 





A permanent I/0 error was detected when the 
BLDL macro instruction was issued to locate 
UCS image in SYSI]1.IMAGELIB. 


A permanent I/0 error was detected when the 
BLDL macro instruction was issued to locate 
f° an FCB module in SYS1.IMAGELIB or a user 
( library. 





A permanent I/0 error was detected when the 
BLDL macro instruction was issued to locate 
one of the following modules in SYS1.IMAGELIB 
or a user library. 








A character arrangement table module 






A copy modification module 






A graphic character modification module 






A library character set module 


Register 0 contains a reason code identifying 
which of the above conditions occurred. 






For an explanation, see Figure 3 on page 155. 
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OC XX A permanent I/0 error was detected during 
forms positioning or while loading the 
printer's FCB buffer. 


Register 0 contains a reason code identifying 
which of the above conditions occurred. 


For an explanation, see Figure 3 on page 155. 





Figure 1 (Part 2 of 3). SETPRT Return Codes for Specific Printers 
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3800 Code | rane 
Other than ‘ —_— 
FCB 3 FCB Code | UCS Code | | ees 
(Byte 1) (Byte 2) (Byte 3) Meaning | ~ 


| , oc A permanent I/0 error was detected while 
= loading one of the following: 
| Character arrangement table 
| | Copy modification record 
| Starting copy number 
| | Graphic character modification record 
: Forms overlay sequence control record 
| Ccopy counts and flash counts) 
Writable character generation module 
3 CWCGM) 
Library character set (3800 only) 
Register 0 contains a reason code identifying 
which of the above conditions occurred. 
| For an explanation, see Figure 3 on page 155. 
ee ee 
a a 
we 
ee ee 








A permanent 1/0 error was detected when an 
attempt was made to display the character set 
image on the printer for visual verification. 




















A permanent I/O error was detected when an 
attempt was made to display the forms control 
image on the printer for visual verification. 





The operator canceled the UCS request because 
an improper character set image was displayed 
for visual verification. 






The operator canceled the FCB request because 
an improper forms control image was displayed 
for visual verification. 


Figure 1 (Part 3 of 3). SETPRT Return Codes for Specific Printers 


The illustration below shows how the four bytes of register 15 
are used for all printers. 


Byte 0 1] 2 3 
General 
Code 


Bit 0 7 8 15 16 23 24 31 


Figure 2 shows the hexadecimal return codes 18 through 24 for 
all printers. 
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C 


SETPRT 


Return 


Code 
(Byte 3) 





No operation was performed for one of the 
following reasons: 


The data control block was not open 


The data control block was not valid for a 
sequential data set. 


The SETPRT parameter list was not valid 


The output device was not a UCS or 3800 
printer 


No operation was performed because an 
uncorrectable error occurred in a previously 
initiated output operation. The error analysis 
CSYNAD) routine is entered when the next PUT or 
CHECK macro instruction is issued. 


No operation was performed because an 
uncorrectable error occurred when the block data 
check or the reset block data check command was 
issued by SETPRT. 


For a 3800, message IEC173I will indicate which 
of the above errors has occurred. 


Register 0 contains a reason code identifying 
whether or not data was lost. For an 
explanation, see Figure 4 on page 155. 


a 

7 
Not enough space has been provided for the 
SYS1.IMAGELIB or a user library control blocks. 

~ 

= 4 

= 4 

wae 

= | 

= 

wa 





SYS1.IMAGELIB Cor, for the 3800, a user library) 
cannot be opened to load the specified module. 


The operator canceled the forms overlay request. 


| The operator canceled the paper threading 
request. 


There are more writable character generation 


modules CWCGMs) requested than there are 
writable buffers installed on the printer. 





There was an invalid table reference character 
for copy modification. 

An _ error occurred when attempting to execute the 
initialize printer command. 


Bursting was requested but the 
Burster-Trimmer-Stacker feature 1s not installed 
on the printer. 















A permanent IO error occurred while executing a 
sense, final select character arrangement table 
command, or display status code. 


The translate table character arrangement table 


entry references a character set that is not in 
the image library. 





Figure 2 (Part 1 of 2). SETPRT Return Codes for All Printers 
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Meaning a : en ae? 





Data was lost because of one of the following 
(3800 only): 








6 3800 system restart after a paper jam 
@ Cancel key 


Lost resources after paper jam 


















A load check was detected while loading one of 
the following (3800 only): 


e Forms control buffer CFCB) 

_ Character arrangement table (CAT) 
Graphic arrangement table (GCM) 
Copy modification record 
Writable character generation module CWCGM) 


Library character set (LCS) 





Register 0 contains a reason code identifying 
which of the above conditions occurred. 





see Figure 3 on page 155. 


When a SETPRT was issued to a SYSOUT data set, 
there was a failure in one of the following 
€3800 only): 


@ The subsystem interface (SSI) for OPEN or 
CLOSE 


For an explanation, 


Data set segmentation 







Queue manager issuing I/0 to read the JFCB 
and/or the JFCBE 


ENQ failure 


More than one DCB is open for the SYSOUT 
data set 





Figure 2 (Part 2 of 2). SETPRT Return Codes for All Printers 
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IBM 3800 MODELS 1 AND 3 


These reason codes, returned in register 0, for the 3800 Models 
l and 3 printers are in addition to completion codes 04, 08, OC, 
and 4C returned in register 15. 


The following illustration shows the contents of register 0, 
which includes the GCM ID, the CAT ID, and the reason code. 


Byte. 0 l 2 3 





Bit Oo 78 1516 23 24. 31 


Figure 3 shows the hexadecimal reason codes for the IBM 3800 
Model 1 and the IBM 3800 Model 3 in compatibility mode. 


| ccm ip | cat rp | Reason Code | | 
(Byte 1) | (Byte 2) | (Byte 3) | Meaning 


Character So reReeaant 
table module/record 








| Copy modification 

module/record 
Starting copy number 
Graphic character 

| modification 
module/record 


| Forms Svemiay sequence 
control record 


Library character set 


| Writable character | 
generation module CWCGM) | 


| Forms control buffer 
| module 





Figure 3. Reason Codes for IBM 3800 Models 1 and 3 Printers 
(GCM ID and CAT ID) 


Figure 4 shows the reason codes in addition to return code 1C 
returned in register 15. The reason code is placed in byte 3 of 
register 0. Bytes 0 through 2 are reserved. 


Reason Code 
(Byte 3) Meaning 





Indicates no data lost. 


Indicates data has been lost. 


ao}; © 
|, © 


Figure 4. Reason Codes for All Printers (Bytes 0 through 2 
Reserved) 
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Figure 5 on page 156 shows the reason codes in addition to 
return code 68 returned in register 15. The reason code is 
placed in byte 3 of register 0. Bytes 0 through 2 are reserved. 


Reason Code 
(Byte 33 Meaning 


A paper jam eauead a restart. A possible lost 
| data condition was detected. 


The cancel key was pressed. 





Resources were lost after a paper jam. 


Figure 5. Reason Codes for IBM 3800 Models 1 and 3 Printers 
(Bytes 0 through 2 Reserved) 


Figure 6 shows the reason codes in addition to return code 50 
returned “i register 15. The reason code is placed in byte 3 of 
register 0. Bytes 0 through 2 are reserved. 


Reason Code 
(Byte 3) 







Meaning 

















An invalid SETPRT peaueet for a SYSOUT dats 
segment was specified. An in-storage address 
was used for a copymod, character arrangement 
table, FCB, or user library DCB. Only 3800 

load module IDs in SYS1.IMAGELIB are allowed 
for SYSOUT setup for 3800. 





If Direct Attach (a directly allocated 3800 
Model 3 or Model 8 printer) is active, data 
management treats the device specified by the 
UNIT parameter as a SYSOUT data set. 


During SETPRT processing for a SYSOUT data 

segment, an error was detected while 

| attempting to read a JFCB or JFCBE control 
block from SWA 


Figure 6. Reason Codes for IBM 3800 Models 1 and 3 Printers 
(Bytes 0 through 2 Reserved) 
















During SETPRT processing for a SYSOUT data 
segment, an error was detected while invoking 
the CLOSE subsystem interface (SSI) for the 
previous data segment 
















During SETPRT processing for a SYSOUT date 
segment, an error was detected while invoking 

the OPEN subsystem interface (SSI) for the new 
data segment being created 


During SETPRT processing for a SYSOUT data 
segment, an error was detected while the 

scheduler spool file allocation routine was 
segmenting the data set 


An ENQ macro failed. 
SETPRT processing. 


oe than one DCB is spentor the SYSOUT data 
set, | 





The ENQ was issued by 
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SETPRT 


The list form of the SETPRT macro instruction is used to 
construct a data management parameter list. 


The description of the standard form of the SETPRT macro 
instruction provides the explanation of the function of each 
operand. The format description below indicates the optional 
and required operands for the list form only. The dcbaddr 
parameter must appear in the list or execute form of the SETPRT 
macro. 


The list form of the SETPRT macro instruction is written as 
follows: 


SETPRT dcbaddr] 

BURST={NIY} 1 

CHARS={ [ name} 

{(name»...)}] 

copuessoumber! 

COPYNR=number] 

’ DISP= [SCHEDULE | NOSCHEDULE | EXTERNAL 

FCB={imageid} 
flimasedds tV1A})31 


{( Enamel, count)}] 
» INIT= [NIY}1 


LIBDCB=dcbaddress] 
MODIFY= eee 
{ (name tre)? 

MSGAREA=address]l 
OPTCD={B|U} 

{({Bj/U},{F]U} )}] 
» PRTMSG=INIY] 
REXMIT={NIY}] 
UCS={csc} 

{(esce-fFIF,VIV} )}1 
»>MF=L 








[ 
[> 
[, 
C» 
[> 
[ 
[, 
c 
[ 
[, 
[> 
[> 
[> 
[ 
C» 
[, 





dcbaddr——A-Type Address 


BURST={NIY} 
is coded as shown in the standard form of the macro 
instruction. 


CHARS={name} 
{(name,>...)} 
1s coded as shown in the standard form of the macro 
instruction, except for the Aladdress) and Rlregister) 
parameters, which cannot be specified. 


COPIES=pnumber 
is coded as shown in the standard form of the macro 
instruction. 


COPYNR=pnumber 
is coded as shown in the standard form of the macro 
instruction. 


DISP={ SCHEDULE | NOSCHEDULE | EXTERNAL} 
is coded as shown in the standard form of the macro 
instruction. 


FCB={imageid} 

{(imageid» {VIA} )} 

is coded as shown in the standard form of the macro 
instruction, except for the Al ) and R( 
parameters, which cannot be specified. 
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FLASH={name} | ae ee fe, 82k es 7 
; {(fnamel, count}} | fA ™. 
is coded as shown in the standard form of the macro a P 

instruction. | mes | | dey 


INIT={NIY} | | 
is coded as shown in the standard form of the macro 
instruction. i. | 


LIBDCB=dcbaddress—A-Type Address or (2-12) 
1s coded as shown in the standard form of the macro 
instruction. . 


MODIFY={name} | 
F(nanastee)) 
is coded as shown in the eeandard form of the macro 
instruction, except for the Aladdress) and R{ j 
parameters, which cannot be specified. 


MSGAREA=address—-A-Type Address or (2-12) 
is coded as shown in the standard form of the macro 
instruction. 


OPTCD= {B[U} 
{({£B|U},{F|U})} 
is coded as shown in the standard form of the macro 
instruction. 


PRTMSG={NIY} 
is coded as shown in the standard form of the macro 
instruction. 


REXMIT={NIY} 
is coded as shown in the standard form of the macro 
instruction. 


: UCS={csc} | — 
: Clcser {FI F,VIV})} ee 
| is coded as shown in the standard form of the macro 

instruction. : 








MF=L 
specifies that the list form of the macro instruction is 
used to create a parameter list that can be referenced by 
an execute form of the SETPRT macro instruction. 
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A remote data management parameter list is referred to, and can 
be modified by, the execute form of the SETPRT macro 
instruction. 


The description of the standard form of the SETPRT macro 

instruction provides the explanation of the function of each 
operand. The format description below indicates the optional 
and required operands for the execute form only. The dcbaddr 


parameter must be specified in the list or execute form of the 
SETPRT macro. 


The execute form of the SETPRT macro instruction is written as 
follows: 


[symbo]]|SETPRT}| (€dcbaddr] 
[»BURST={NIYV]} 1] 
[,CHARS= {namelAtaddress} [RCregister )} 
{( {name [Aladdress)1IR(register)},...)} 


{x 
{,COPIES= number |} : 
cs » COPYNR={number |*}] : 
c ) 





Dee CH RUUTE INOS CHEDUEE EXTERNAL? 
FCB= fimaseidlA (address) |IR(register )} 
{ ( timagead|ACaddress}|R(reaister), 
{VIA} J} 0%} 1 
[,FLASH={name} 
{( Cnamel, count )} 
: {x} 1] 
[,INIT={N|Y}] 
[, LIBDCB=dcbaddress 
[, MODIFY={namelAladdress) IR(register )} 
{( {iname |Aladdress) IRlreaister)}, »trc} 


{x 
MSGAREA=address! 


{, 
[L; OPTCD= {B| 
},CF[U} 331 

{,PRTMSG=I[N 
[,REXMIT={N|V1¥}1 
[,UCS={csc} 

{(csce»{FIF,VIV})}1 
»MF=(E, {data management list addressi(1)}) 








dcbaddr—RX-Type Address or (2-12) 


BURST={NIY 1%} 
1s coded as shown in the. standard form of the macro 
instruction, except for the * subparameter, which can be 
used only when INIT=Y is specified in the execute form of 
the SETPRT macro instruction. When BURST=* is coded, the 
BURST field in the parameter list remains as it was 
liad set. This operand is valid for the 3800 printer 
only 


CHARS= {namelACaddress} IR (reaister)) 
{ ( ppnamelA (address) /R{register)},...)} 


is coded as shown in the standard form of the macro 
instruction, except for the * subparameter, which can be 
used only when INIT=Y is specified in the execute form of 
the SETPRT macro instruction. When CHARS=* is coded, the 
CHARS field in the parameter list remains as it was 
previously set. 


COPIES={number |x} 
is coded as shown in the standard form of the macro 
instruction, except for the *® subparameter, which can be 
used only when INIT=Y is specified in the execute form of 
the SETPRT macro instruction. When COPIES=% is coded, the 
COPIES field in the parameter list remains as it was 
previously set. 
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COPYNR= {number |*} 


is coded as shown in the standard form of the macro ia 
instruction, except for the * subparameter, which can be ee 
used only when INIT=Y is specified in the execute form of 
the SETPRT macro instruction. When COPYNR=* is coded, the 
COPYNR field in the parameter list remains as it was 
previously set. 


DISP={SCHEDULE | NOSCHEDULE | EXTERNAL} 
is coded.as shown in the standard form of the macro 
instruction. 


FCB= fimageid|A (address 11R (resister) } 

famadedd{A (address) IR(register J},{V|A})} 

% 

is coded as shown in the standard form of the macro 
instruction, except for the * subparameter, which can be 
used only when INIT=Y is specified in the execute form of 
the SETPRT macro instruction. When FCB=* is coded, the FCB 
Ueda in the parameter list remains as it was previously 
set. 


FLASH={name} 

fh poame) count )3 

4 
1s coded as shown in the standard form of the macro 
instruction, except for the * subparameter, which can be 
used only when INIT=Y is specified in the execute form of 
the SETPRT macro instruction. When FLASH=* is coded, the 
FLASH field in the parameter list remains as it was 
previously set. 


INIT= {NIY} 
is coded as ehoun in the standard form of the macro 
instruction. When INIT=Y is specified on the execute form 
of the SETPRT macro instruction, all 3800 fields in the 
parameter list CBURST, CHARS, COPIES, COPYNR, FCB, FLASH, 
MODIFY, and REXMIT) will be reset to binary zeros unless a 
specified field is preserved by coding Keyword parameter=xX 
or changed by specifying a valid subparameter for the 
Keyword parameter as described in the standard form of the 
macro instruction. 


LIBDCB=dcbaddress—A-Type Address or (2-12) 
is coded as shown in the standard form of the macro 
instruction. 


MODIFY={namelAtaddress) |R (register )} 
{ ( tc Rai oleae oammneaeaibaae 


is coded as shown in the standard form of the macro 
instruction, except for the * subparameter, which can be 
used only when INIT=Y is specified in the execute form of 
the SETPRT macro instruction. When MODIFY=% is coded, the 
MODIFY field in the parameter list remains as it was 
previously set. 


MSGAREA=address—A-Type Address or (2-12) 
is coded as shown in the standard form of the macro 
instruction. 7 


OPTCD={B]|U} 
{({B[U},CF|U})} 
is coded as shown in the standard form of the macro 
, instruction. 


PRTMSG={NIY} 
is coded as shown in the standard form of the macro 
instruction. 
is coded as shown in the standard form of the macro 
instruction. 
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REXMIT={NIY|} 
is coded as shown in the standard form of the macro 
instruction, except for the * subparameter, which can be 


used only when INIT=Y is specified in the execute form of 
the SETPRT macro instruction. When REXMIT=% is coded, the 
REXMIT field in the parameter list remains as it was 
previously set. 
UCS={csc} 
{(csce» {FIF,VIiV} )} 
is coded as shown in the standard form of the macro 
instruction. | 
MF=(E,{data management list address|(1)}) 
specifies that the execute form of the SETPRIT macro 
instruction is used, and an existing data management 
parameter list is used. 
E—Coded as shown 
data management list address—RX-Type Address, (2-12), 
or (1) 
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—_ = 
The STOW macro instruction causes the system to update a Rew! 
partitioned data set directory by adding, changing, replacing, aad 
or deleting an entry in the directory. Only one entry can be 

updated at a time using the STOW macro instruction. If the 

entry to be added or replaced is a member name, the system 

writes an end-of-data indication following the mamber. All 

input/output operations using the same data control block must 

have previously been tested for completion. 


The STOW macro is written: 


i Csyvmboll]}| STOW 





»directory action] 
Cydirectory actionlAICIDIR1] 


—RX-Type Address, (2-12), or (1) 
The dcb address operand specifies the address of the data 
control block for the opened partitioned data set. The 
STOW macro instruction can be used only when the data set 
is opened for OUTPUT, UPDAT or OUTIN CBSAM). 


—RX-Type Address, (2-12), or (0) 
The list address operand specifies the address of the area 
containing the information required by the system to 
maintain the partitioned data set directory. The size and 
ab ae the area depend on the directory action requested 
as follows: 


Adding or Replacing a Directory Entry: The list address 
operand must specify an area at least 12 bytes long and 


beginning on a halfword boundary. The following 
illustration shows the format of the area: 


List Address 


Length 


By tes to 62 





NAME: Specifies the member name or alias being added or 
replaced. The name must begin in the first byte of the 
field and be padded on the right with blanks, if necessary, 
to complete the 8-byte field. 


TT: Specifies the relative track number where the beginning 
of the data set is located. 


R: Specifies the relative block Crecord) number on the 
track identified by TT. 


Note: The TTR field shown above must be supplied by the 
problem program if an alias (alias bit is 1) is being added 
or replaced. The system supplies the TTR field when a 
member name is being added or replaced. 
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STOW 


C: Specifies the type of entry (member or alias) for the 
name, the number of note list fields CTTRNs), and the 
length in halfwords, of the user data field. The following 
describes the meaning of the 8 bits: 





Bit _ Meaning 
0=0 . Indicates a member name. 
0=1. Indicates an alias. 


l and 2 Indicate the number of TTRN fields (maximum of 3) 
| in the user data field. 


3-7. Indicate the total AUAbeE of halfwords in the user 
data field 7 


Deleting a Directory Entry: The list address operand must 
specify an 8-byte area that contains the member name or 
alias to be deleted. The name must begin in the first byte 
of the area and be padded on the right with blanks, if 
necessary, to complete the 8 bytes. 


Changing the Name of a Member: The list address operand 
must specify the address of a l6-byte area; the first 8 
bytes contain the old member name or alias, and the second 
8 bytes contain the new member name or alias. Both names 
must begin inthe first byte of their 8-byte area and be 
padded on the right with blanks, if necessary, to complete 
the 8-byte field. 


jon—tCdef.AjCIDIRI | 
If the directory action cperand is not coded, A Cadd an 
entry) is the default. The operand is coded as shown to 
specify the type of directory action: 


A _ 
specifies that an entry is to be added to the 
SARE GT er Ys 

s | 
specifies that the name of an exas sing member or alias 
is to be changed. 

D 
specifies that an existing directory entry is to be 
deleted. 

R 


specifies that an existing directory entry is to be 
replaced by a new directory entry. If R is coded but 
the old entry is not found, the new entry is added to 
the directory and a completion code of X'08*° is 
returned in register 15 


COMPLETION CODES 


When the system returns control to the problem program, register 
15 contains a return code and register 0 contains a reason code 
in the low-order byte; the three high-order bytes cof both 
registers are set to 0. ; 
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Codes 
Return (15) 


00 


04 


08 


oc 


10 


14 


18 


vee following is a list of return codes contained in register 


A 


The update of 
the directory 
was completed 
successfully. 


The directory 
already 
contains the 


specified name. 


No space left 
in the 
directory. 
The entry 
could not be 
added, 
replaced, or 
changed. 


A permanent 
input or 
output error 
was detected. 
Control is not 
given to the 
error analysis 
CSYNAD) 
routine. 


The specified 
data control 
block is not 
open or is 
opened for 
input. 


Insufficient 
virtual 
storage was 
available to 
perform the 
STOW function. 


Directory Action 


R 


The update of 
the directory 
was completed 
successfully. 


The specified 
name could not 
be found. 


No space left 
in the 
directory. 
The entry 
could not be 
added, 
replaced, or 
changed. 


A permanent 
input or 
output error 
was detected. 
Control is not 
given to the 
error analysis 
CSYNAD) 
routine. 


The specified 
data control 
block is not 
open or is 
opened for 
input. 


Insufficient 
virtual 
storage was 
available to 
perform the 
STOW function. 


D 


The update of 
the directory 
was completed 
successfully. 


The specified 
name could not 
be found. 


A permanent 
input or 
output error 
was detected. 
Control is not 
given to the 
error analysis 
CSYNAD) 
routine. 


The specified 
data control 
block is not 
open or is 
opened for 
input. 


Insufficient 
virtual 
storage was 
available to 
perform the 
STOW function. 
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The update of 
the directory 
was completed 
successfully. 


The directory 
already 
contains the 
specified new 
name. 


The specified 
old name could 
not be found. 


No space left 
in the 
directory. 
The entry 
could not be 
added, 
replaced, or 
changed. 


A permanent. 
input or 
output error 
was detected. 
Control is not 
given to the 
error analysis 
CSYNAD) 
routine. 


The specified 
data control 
block is not 
open or is 
opened for 
input. 


Insufficient 
virtual 
storage was 
available to 
perform the 
STOW function. 














STOW 


The following is a list of reason codes contained in register 0. 


Reason 
Code (0) 


00 ¢X*00') 
O01 X01") 


02 (X'02') 


3383 
(X"'D37') 


Meaning 
Reason code is not applicable. (Returned with 
all return codes except 10.) 


All functions; the permanent I/O error occurred 
while reading or writing directory blocks. 


Add and replace functions; the permanent I/0 
error occurred while EOF mark after the member. 


Error occurred when trying to write an EOF; all 
primary space used. 
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M_HSYNAD ANALYSIS FUNCTION (BDAM, BISAM, BPAM, BSAM, EXOCP, QZ5AM> AND 


The SYNADAF macro instruction is used in an error analysis 
routine to analyze permanent input/output errors. The routine 
can be a SYNAD exit routine specified ina data control block 
for BDAM, BISAM, BPAM, BSAM, QISAM, QSAM, or a routine that is 
entered directly from a program that uses the EXCP macro 


instruction. (The a macro instruction is described in Data 


The SYNADAF macro instruction uses register 1 to return the 
address of a buffer containing a message. The message describes 
the error, and can be printed by a subsequent PUT or WRITE macro 


instruction. The message consists of EBCDIC information and is 


in the form of a variable-length record. The format of the 
dhseasbueate is shown following the descriptions of the SYNADAF 
operands. 


The system does not use the save area whose address is in 
register 13. Instead, it provides a save area for its own use, 
and then makes this area available to the error analysis 
routine. The system returns the address of the new save area in 
register 13 and in the appropriate location (word 3) of the 
previous save area; it also stores the address of the previous 
save area in oe appropriate location Cword 2) of the new save 
area. 


The SYNADAF macro instruction passes parameters to the system in 
registers 0 and 1. When used in a SYNAD exit routine, the 
SYNADAF macro should be coded at the beginning of the routine. 
(See Figure 10, Figure 11, and Figure 12 in Appendix A, “Status 
Information Following an Input/Output Operation" on page 190.) — 
For BISAM and QISAM, the SYNAD exit routine has to set up these 
parameters as explained under PARML and PARM2. To save these 
parameters for use by the SYNAD exit routine, the system stores 
them in a parameter save area that follows the message buffer as 
shown in the message buffer format. The system does not alter 
the return address in register 14 or the entry point address in 
register 15 


When a SYNADAF macro instruction is used, a SYNADRLS macro 
instruction must be used to release the message buffer and save 
areas, and to restore the original contents of register 13. 


The SYNADAF macro is written: 


iCsymbol]] SYNABAF | ACSMETH={BDAM 
| | [,»PARM1=parm register] 
[»PARM2=parm register ]} 
{BPAM 
[»PARMi=parm register] 
[,PARM2=parm register ]} 
CBSAM 
[,PARM1=parm register] 
[,»PARM2=parm register]} 
LQSAM 
[»PARM1= j ] 


[,PARM1= iob address} 
{QISAM | 
[,PARMI= =dcbaddel 
{ »PARM2=pa sisteri} 





ACSMETH=BDAM, BPAM, BSAM, QSAM, BISAM, EXCP, or QISAM 
specifies the access method used to perform the 
input/output operation for which error analysis is 
performed. 
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PARMI=parm register» jobaddr» or debaddr—(C2-12) or (1) 
f"- specifies the address of information that is dependent on 
( the access method being used. For BDAM, BPAM, BSAM, or 

am QSAM, the operand specifies a register that contains the 
information that was in register 1 on entry to the SYNAD 
routine. For BISAM or QISAM, it specifies the address of 
the data control block; for EXCP, it sreecifies the address 
of the input/output block. If the operand is omitted, 
PARM1=(1) is assumed. 


PARM2=parm register—(2-12), (0), or RX-Type 

Conly if ACSMETH=QISAM) 
specifies the address of additional information that is 
dependent on the access method being used. For BDAM, BPAM, 
BSAM, QISAM, and QSAM, the operand specifies a register 
that contains the information that was in register 0 on 
entry to the SYNAD exit routine. For BISAM, the operand 
specifies a register that contains the information that was 
in register 1 on entry to the SYNAD exit routine (the 
address of the DECB). For EXCP, the operand is meaningless 
and should be omitted. If the operand is omitted, except 
in the case of EXCP, PARM2=(0) is assumed. 


Note: To correctly load the registers for SYNADAF for BISAM, 
code these two instructions before issuing the SYNADAF macro: 


LR 0,1 GET DECB ADDRESS 
L 1,81) GET DCB ADDRESS 


COMPLETION CODES 


When the system returns control to the problem program, the 
low-order byte of register 0 contains one of the following 


( | Ata codes; the three high-order bytes of register 0 are set 
oO 
Reason 
Code (0) Meaning 


00 ¢€X'00') Successful completion. Bytes 8 through 
13 of the message buffer contain 
blanks. 


0G ¢€X'0G') Successful completion. Bytes 8 through 
eel the message buffer contain binary 
ata. 


08 (X'08!') Unsuccessful completion. The message 
can be printed, but some information is 
missing in bytes 50 through 127 and is 
represented by asterisks. If byte 8 is 
a blank (X'G0'), bytes 9 through 13 are 
either blanks or are not initialized. 
If byte 8 is not a blank, then data was 
read, and bytes 8 through 13 of the 
message buffer contain binary data. 





Macro Instruction Descriptions 167 





SYNADAF 
MESSAGE BUFFER FORMAT 











































7 . o> 
oe mi 
The following illustration shows the format of the message NG 
buffer; the address of the buffer is returned in register 1. 
Input 
Message Butfer Input: Buffer 
Byte 0 4 8 Address 
Doubleword Output: 
Boundary oe 
LL = 128. t= 124; bb = 000 
50 | = 3 59 | 68 72 75 84 
Jobname Stepname Unit * Sesice DDname 
Address Type 
84 | 9) | 107 
Operation . 
Attempted Error Description 
107 122 128 
Access 
Unit Record: (Asterisks) Method 
120 128 
(End of Buffer - 
1 es Relative Block Access a 
Magnetic Tape: ie ; (Blanks) — Beginning of 
——— Number (decimal) Method py Parsmieler SavecAtea a 
(07 122 128 "4 






Actual Track Address and Block Number 
(BBCCHHR in hexadecimal format) 







Access 


Direct Access: 
eo Method 


Parameter Save Area 















128 132 136 
Parameter Parameter 
Register 0 Register | 
(PARM2) (PARM1) 


Notes: 


1. The device type field (bytes 72 through 73) contains UR for a unit record 
device, TA for a magnetic tape device, or DA for a direct access device. 


2. If a message field (bytes 91 through 105) is not applicable to the type of error 
that occurred, it contains N/A or NOT APPLICABLE. 


3. If no data was transmitted, or if the access method is QISAM, bytes 8 through 13 
contain blanks or binary zeros. 


G. If the access method is BISAM, bytes 68 through 70, 84 through 89, and 107 
through 120 contain asterisks. 


5. If the access method is BDAM, and if the error was an invalid request, bytes 107 
through 120 contain EBCDIC zeros. 


6. The unit address field (bytes 68 through 70) contains the letters 'JES' if the 
data set is SYSIN or SYSOUT. 
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The SYNADRLS macro instruction releases the message buffer, 
parameter save area, and register save area provided by a 
SYNADAF macro instruction. It must be used to perform this 
function whenever a SYNADAF macro instruction 18s used. 


When the SYNADRLS macro instruction is issued, register 13 must 
contain the address of the register save area provided by the 
SYNADAF macro instruction. The control program loads register 
13 with the address of the previous save area, and sets word 3 
of that save area to 0. Thus, when control is returned, the 
Save area pointers are the same as before the SYNADAF macro 
instruction was issued. 


The SYNADRLS macro is written: 


When the system returns control to the problem program, the 
low-order byte of register 0 contains one of the following 
reason codes; the three high-order bytes of register 0 are set 
to 


Reason 
Code (0) Meaning 


00 (€X*'00') Successful completion. 


08 €X'08'") Unsuccessful completion. The buffer 
and save areas were not released; the 
contents of register 13 remain 
unchanged. Register 13 does not point 
to the save area provided by the 
SYNADAF macro instruction, or this save 
area is not properly chained to the 
previous Save area. 
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SYNCDEV 
| SYNCDEV-"SYNCHRONIZE DEVICE 


The SYNCDEV macro instruction allows you to control data ee, 
synchronization for the IBM 3480 Magnetic Tape Subsystem that . 
supports buffered write mode. Data records in the tape control 
unit buffer may not yet be on tape when your program is ready to 
send more. There is no way to determine how much data is left 
in the buffer, and it is time dependent to tape motion. This 
data is not synchronized to your program; that is, you could 
overlay unwritten data in the buffer, or lose data when it is 
transferred from the channel if the buffer does not have enough 
space to hold it. You can use the SYNCDEV macro to either: 


e Request information regarding synchronization 


e Demand synchronization if the specified number of data 
blocks are buffered 


If more blocks are buffered than were specified, the system 
stays in control until all the blocks are written to the 
tape or it detects an I/O error. 


If the same amount or fewer blocks are buffered, buffering 
is not affected. 


Note: Demands for synchronization are ignored if the drive is 
in read mode. 


The SYNCDEV macro is written: 


[symbol] | SYNCDEV | DCB=addr 
C, CABUFBLK=addr | BUFBLK= 
{maximum buffer depth!0}}1 
[,INQ={YES|NQ} 1 





The following describes the operands that can be specified for — 
SYNCDEV. 


DCB=addr““A-Type address or (2-12) 
specifies the address of the data control block. 


ABUFBLK=addr | BUFBLK= i Q 
specifies the maximum number of data blocks that can be 
buffered. 


ABUFBLK=addr~~“A-Type address or (2-12) 
specifies the address of a halfword on a halfword 
boundary that contains a value that specifies the 
maximum number of data blocks that can be buffered. 


BUFBLK={maximum buffer depth! 0} 
specifies the maximum number of data blocks that can 
be buffered. This number can be an absolute value 
from 0 to 65535. The BUFBLK value can be in the two 
low-order bytes of a register (2-12). 


Q 
If neither ABUFBLK nor BUFBLK is specified, the 
number of data blocks that can be buffered 
defaults to 0, and no data blocks are buffered. 


INQ={YES|NQ} 
specifies whether this is a request for information about 
the degree of synchronization or a request for 
synchronization. | 


YES 


specifies an inquiry as to how many data blocks are in 
the buffer. 
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SYNCDEV 


number of data blocks that can be buffered as 
specified in ABUFBLK or BUFBLK. 


Register 0 contains the number of buffered physical 
blocks if the previous operation completed 
successfully. 


( specifies a request for synchronization based on the 


Note: Do not use this option in 3l-bit residence 
mode; it requires a 24-bit addressing mode parameter 
list. 
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SYNCDEV——LIST FORM a | 
The list form of the SYNCDEV macro is written: 


| Csymbol.1| SYNCDEV| LDCB=addr 1. 
| [, LBUFBLK=maxi 


t INQ= ={VESINO}] 
» MEE 





The following describes the operands that can be specified for 
the list form of SYNCDEV. 


DCB=addr““"A-Type address 
specifies the address of the data control block. 


BUFBLK={maximum buffer depth] 0} 
specifies the maximum number of data blocks that can be 
buffered. This number can be an absolute value from 0 to 
65535. If BUFBLK is not specified, the number of data 
blocks that can be buffered defaults to 0, and no data 
blocks are buffered. 


0 
If neither ABUFBLK nor BUFBLK is specified, the number 
of data blocks that can be buffered defaults to 0, and 
no data blocks are buffered. 


INQ={YES |NQ} 
specifies whether this is a request for information about 
the degree of synchronization or a request for 
synchronization. 


YES 


specifies an inquiry as to how many data blocks are in 
the buffer. 


NO 
specifies a request for synchronization based on the 
number of data blocks that can be buffered as 
specified in BUFBLK. 


MP= | 
generates a 24-bit addressing-mode parameter list that 
contains no executable instructions. The list can be used 


as input and can be modified by the execute form of the 
SYNCDEV macro. 


Note: Do not use this option in 3l-bit residence mode; it 
requires a 24-bit addressing-mode parameter list. 
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SYNCDEV 
| SYNCDEV-“EXECUTE FORM 


The execute form of the SYNCDEV macro is written: 


[symbol ]]SYNCDEV| [DCB=addr] 


Ba aaa ig anata 


| tf, INQ={YES|NO}] 
»MF=(E, addr) 


10331 


The following describes the operands that can be specified for 
the execute form of SYNCDEV. 


DCB=addr~"A-Type address or (2-12) 
specifies the address of the data control block. 


ABUFBLK=addr |BUFBLK={ j 190 
specifies the maximum number of data blocks that can be 
buffered. 


ABUFBLK=addr-“A-Type address or (2-12) 
specifies the address of a halfword on a halfword 
boundary that contains a value that specifies the 
maximum number of data blocks that can be buffered. 


BUFBLK=maximum buffer depthi9 
specifies the maximum number of data blocks that can 
be buffered. This number can be an absolute value 
from 0 to 65535. The BUFBLK value can be in the two 
low-order bytes of a register (2-12). 


Q 
If neither ABUFBLK nor BUFBLK is specified, the 
number of data blocks that can be buffered 
defaults to 0, and no data blocks are buffered. 


INQ={YES|NO} 
specifies whether this is a request for information about 
the degree of synchronization or a request for 


synchronization. 

YES : 
specifies an inquiry as to how many data blocks are in 
the buffer. 

NO 


specifies a request for synchronization based on the 
number of data blocks that can be buffered as 
specified in ABUFBLK or BUFBLK. 


Register 0 contains the number of buffered physical 
blocks if the previous operation completed 
successfully. 


Note: Do not use this option in 31-bit residence 
stat it requires a 24-bit addressing mode parameter 
a § e : 


MF=(E,addr) 
specifies the execute form of SYNCDEV. 


addr~“A-Type address, RX-Type address, or (2-12) 
specifies the 24-bit addressing-mede address for the 
parameter list. 
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SYNCDEV 


COMPLETION CODES 





When the system returns control to your problem program, the 
low-order byte of register 15 contains a return code; the 
low-order byte of register 0 contains a reason code: 





Return Reason fae 

Code (15) Code (0) Meaning 

00 CX'00") Successful completion. Register 0 
contains the number of data blocks in 
the control unit buffer. 

04 (X'06') O1 ¢CX*Ol*) Incorrect parameter. 

04 (X'04') 02 €X'02") Incorrect DCB or a DEBCHK error. 

04 (X"'04') 03 €X'03*) Environmental error. 

04 (X'04') 06 (X'04') Incorrect input to NOTE. 

0G (X*04") 05 €X*'05') Device does not support buffering. 

04 (X'0G") ll CX*OBt) Unsuccessful call to ESTAE macro. 

0G CX'06*) l2 (X'0C*) Unsuccessful GETMAIN request. 

08 (X'*08'") Permanent I/70 error during read block 
ID or synchronize command. 

12 (X?0cC?*) Permanent I/0 error on the last channel 


program with loss of data. 


Note: If you specified a SYNAD option 
in the DCB and issue a PUT or CHECK 
macro after this error occurs, your 
program cannot enter the SYNAD routine. 
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The TRUNC macro instruction causes the current output buffer to 
be regarded as full. The next PUT or PUTX macro instruction 
specifying the same data control block uses the next buffer to 
hold the logical record. 


When a variable-length spanned record is truncated and logical 
record interface, or extended logical record interface, is 
specified (that is, if BFTEK=A is specified in the DCB macro 
instruction, or if a BUILDRCD macro instruction is issued, or if 
DCBLRECL=0K or nnnnnK is specified), the system segments and 
writes the record before truncating the buffer. Therefore, the 
block being truncated is the one that contains the last segment 
of the spanned record 


The TRUNC macro instruction is ignored if it is used for 
unblocked records, if it is used when a buffer is full, or if it 
is used without an intervening PUT or PUTX macro instruction. 


The TRUNC macro is written: 


—-RX-Type Address, (2-12), or (1) 
The dcb address operand specifies the address of the data 
control block for the sequential data set opened for 
output. The record format in the data control block must 
not indicate standard blocked records CRECFM=FBS). 
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R ONE OR MORE EN (BDAM, BISAM, BPAM» AND BSAM 


The WAIT macro instruction is used to inform the control program é ™ 
that performance of the active task cannot continue until one or es 
more specific events, each represented by a different ECB Cevent a 
control block), have occurred. In the context of this manual, 

the ECBs represent completion of I/0 processing associated with 

a READ or WRITE macro. ECBs are located at the beginning of 

access method DECBs (data event control blocks), so that the 

DECB name provided in READ and WRITE macros is also used for 

WAIT. CA description of the ECB is found in Appendix A, "Status 
Information Following an Input/Output Operation" on page 190. 

For information on anee to use the WAIT macro, see 


The control program takes the following action: 


e For each event that has already occurred Ceach ECB is 
already posted), the count of the number of events is 
decreased by 1 


e If the number of events is 0 by the time the last event 
control block is checked, control is returned to the 
instruction following the WAIT macro instruction. 


e If the number of events is not 0 by the time the last ECB is 
checked, control is not returned to the issuing program 
until sufficient ECBs are posted to bring the number to 0. 
Control is then returned to the instruction following the 
WAIT macro instruction. 


e The events will be posted complete by the system when all 
I/0 has been completed, temporary errors have been 
corrected, and length checking has been performed. The DECB 
is not checked for errors or exceptional conditions, nor are 
end-of-volume procedures initiated. Your program must 
perform these operations. 


The WAIT macro is written: 


[symbol]| WAIT [number of events] 
{,ECB=addr J ECBLIST=addr} 
[, LONG={YES|NO}] 





specifies a decimal integer from 0 to 255. Zero is an 
effective NOP instruction; 1 is assumed if the operand is 
omitted. The number of events must not exceed the number 
of event control blocks. You may also use register 
notation (2-12) 


ECB=addr 
specifies the address of the event control block Cor DECB) 
representing the single event that must occur before 
processing can continue. The operand is valid only if the 
number of events is specified as 1 or is omitted 


addr 
specify RX type or use register notation (1-12). 


ECBLIST=addr 
specifies the address of a yietual storage area containing 
one or more consecutive fullwords on a fullword boundary. 
Each fullword contains the address of an event control 
block Cor DECB); the high-order bit in the last word 
(address) must be set to 1 to indicate the end of the list. 
The number of event control blocks must be equal to or 
greater than the specified number of events. 
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LONG=[YES|NO] 
specifies whether the task is entering a long wait or a 
regular wait. Normally, I/0 events should not be 
considered ‘long' unless it is anticipated that operator 
intervention will be required. 


Caution: A job step with all its tasks in a WAIT condition 
terminates upon expiration of the time limits that apply to it. 


Access method ECBs are maintained entirely by the access methods 
and supporting control program facilities. The user may inspect 
access method ECBs, but should never modify them. 
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WRITE-“WRITE A BLOCK (BDAM) 


The WRITE macro instruction causes the system to add or replace 
a block in an existing direct data set. (This version of the 
WRITE macro instruction cannot be used to create a direct data 
set because no capacity record facilities are provided.) 

Control may be returned before the block is written. The output 
operation must be tested for completion using a CHECK or WAIT 
macro instruction. A data event control block, shown in 
Appendix A, "Status Information Following an Input/Output 
Operation™ on page 190, is constructed as part of the macro 
expansion. 


The standard form of the WRITE macro instruction is written as 
follows (the list and execute forms are shown following the 
descriptions of the standard form): 


[svmbol]] WRITE 





deck name—symbol 
specifies the name assigned to the data event control block 
created as part of the macro expansion. 


type—{DAIF1} 
CDICFIXI} 
CDKIFIXI} 
is coded in one of the combinations shown to specify the 
type of write operation and optional services performed by 
the system: 


DA 
specifies that a new data block is to be added to the 
data set. The search for available space starts on 
the track indicated by the block address operand. 
Fixed-length records Cwith keys only) are added to a 
data set by replacing dummy records. Variable-length 
records (with or without keys) are added to a data set 
by uSing available space ona track. (For more 
information on adding records to a direct data set, 
see Data Administration Guide. For a description of 
adding records with extended search, see the LIMCT 
operand of the DCB macro. 


DI | 

specifies that a data block and key, if any, are to be 
written at the device address indicated in the area 
specified in the block address operand. Any attempt 
to write a capacity record (R9) is an invalid request 
when relative track addressing or actual device 
addressing are used, but when relative block 
addressing is used, relative block 0 is the first data 
block in the data set. 


DK 
specifies that a data block Conly) is to be written 
using the key in the area specified by the Key address 
operand as a search argument; the search for the block 
starts at the device address indicated in the area 
specified in the block address operand. 
description of the DCB macro instruction, LIMCT 
operand, contains a description of the search. 
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WRITE 


requests that the system provide block position 
-_ feedback into the area specified in the block address 
( operand. This character can be coded as a suffix to 
DA, DI, or DK as shown above. 


_ requests that the system release the exclusive control 
requested by a previous READ macro instruction and 

provide block position feedback into the area 
specified in the block address operand. This 
character can be coded as a suffix to DI or DK as 
shown above. 


—-A-Type Address or €2-12). 
specifies the address of the data control block for the 
opened BDAM data set. 


—A-Type Address, (2-12), or "S* 
specifies the address of the area that contains the data 
block to be written. 'S' can be coded instead of an area 
address only if the data block (Cor key and data) are 
contained ina buffer provided by dynamic buffering; that 
is, 'S* was coded in the area address operand of the 
associated READ macro instruction. If 'S'* is coded in the 
WRITE macro instruction, the area address from the READ 
macro instruction data event control block must be moved 
into the WRITE macro instruction data event control block; 
the buffer area acquired by dynamic buffering is released 
after the WRITE macro instruction is executed. For a 
description of the data event control block, sea 
Appendix A, "Status Information Following an Input/Output 
Operation" on page 190. 


lenath—symbol, decimal digit, absexp, (2-12) or ‘'S' 
specifies the number of data bytes to be written up to a 
| maximum of 32760. If 'S' is coded, it specifies that the 
( system uses the value in the block size (DCBBLKSI) field as 
: the length. When undefined~lLength records are used, if the 
WRITE macro instruction is for update and the length 
specified differs from the original block, the new block 
will be truncated or padded with binary zeros accordingly. 
The problem program can check for this ‘Situation in the 
SYNAD routine. Ae 


If the length operand 1s omitted for format- U records, no 
error indication is given when the program is assembled, 
but the problem program must insert a length into the data 
So ae block before the WRITE macro aeenMenten is 
executed 


kev address—A-Type Address, (2-12), 'S', or 0 
ePecl tes the address of the area that contains the key to 
be used.. 'S' is specified instead of an address only if 
the key is contained in an area acquired by dynamic 
buffering. If the key is not written or used as a search. 
argument, zero is specified instead of a key address. 


aon = Type Address or (2-12) 
specifies the address of the area that contains. the 
relative block address, relative track address, or actual 
device address used in the output operation. The length of 
the area depends on the type of addressing used and if the 
block. SP RAO Sees F) is specified in the data control 
oc —_ 


If OPTCD= F has been specified in the DCB macro ana For X 
is specified in the WRITE macro, you must provide a 
relative block address in the, form specified by. OPTCD in 
the DCB macro. For example, if OPTCD=R is specified, you 
must provide a 3-byte relative block address; if OPTCD=A is 
specified, you must provide an 8-byte actual device address 
CMBBCCHHR); if neither is specified, you must provide a 
3-byte relative address (TTR). . 
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If OPTCD=F has not been specified in the DCB macro and F or 
X 1s specified in the WRITE macro, then you must provide an 
&-byte actual device address (MBBCCHHR) even if relative 
block or relative track addressing is being used. 





wat 
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WRITE 


The WRITE macro instruction causes the system to add or replace 
a record or replace an updated block in an existing indexed 
sequential data set. Control may be returned to the problem 
program before the block or record is written. The output 
operation must be tested for completion using a WAIT or CHECK 
macro instruction. A data event control block, shown in 
Appendix A, "Status Information Following an Input/Output 
Operation” oan page 190, is constructed as part of the macro 
expansion. 


The standard form of the WRITE macro instruction is written as 
follows Cthe list and execute forms are shown following the 
descriptions of the standard form): 





° Bettie the name assigned to the data event control block 
created as part of the macro expansicn. 


type-—{K | KN} 


1S coded as shown to specify the type of write operation: 


K 





specifies that either an updated unblocked record or a 
block containing an updated record is to be written. 

If the record has been read using a READ KU macro 
instruction, the data event control block for the READ 
macro instruction must be used as the data event 
control block for the WRITE macro instruction, using 
the execute form of the WRITE macro instruction. 


KN 
specifies that a new record is to be written, or a 
variable-length record is to be rewritten with a 
different length. All records or blocks of records 
read using READ KU macro instructions for the same 
data control block must be written back before a new 
record can be added, except when the READ KU and WRITE 
KN reference the same DECB. 


ich address-—A-Type Address or €2-12) 
specifies the address of the data control block for the 
opened existing indexed sequential data set. If a block is 
written, the data control block address must be the same as 
the dcb address operand in the corresponding READ macro 
instruction. 


ea address~~A~Type Address, (2-12), or 'S' 
specifies the address of the area containing the logical 
record or block of records to be written. The first 16 
bytes of this area are used by the system and should not 
contain your data. The area address must specify a 
different area than the key address. When new records are 
written Cor when variable-length records are rewritten with 
a different length), the area address of the new record 
must always be supplied by the problem program. This area 
may be altered by the system. ‘'S' may be coded instead of 
an address only if the block of records is contained in an 
area provided by dynamic buffering; that is, 'S* was coded 
for the area address operand in the associated READ KU 
macro instruction. This area is released after execution 
of a WRITE macro instruction using the same DECB. The area 
can also be released by a FREEDBUF macro instruction. 
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WRITE 


The following illustration shows the format of the area: _ 


Area—— _ 
Address | 


rN 
ed 


Control Logical Record (WRITE KN) or Block 
Program Use| of Records CWRITE K) 





Indexed sequential buffer and. work area requirements are 
discussed in ; 


lenath—symbol, decimal digit, absexp, (2-12) or 'S' 
specifies the number of data bytes to be written, up to a 
maximum of 32760. Specify "S' unless a variable-length 
record will be rewritten with a different length. 


key address-—A-Type Address or (2-12) 
specifies the address of the area containing the key of the 
new or updated record. The key address must specify a 
different area than the area address. For blocked records, 
this is not necessarily the high key in the block. For 
unblocked records,. this field should not overlap with the 
work area specified in the MSWA parameter of the DCB macro 
instruction. | 


Note: When new ipecorde are written, the key area may be. 
altered by the system. 
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WRITE 
WRITE-“WRITE A BLOCK (BPAM AND BSAM) 


E. The WRITE macro instruction causes the system to add or replace 

; a block in a sequential or partitioned data set being created or 
updated. Control may be returned to the problem program before 
the block is written. The output operation must be tested for 
completion using the CHECK macro instruction. A data event 
control block, shown in Appendix A, "Status Information 
Following an Input/Output Operation™ on page 190, is constructed 
as part of the macro expansion. 


If translation from EBCDIC code to ISCII/ASCII code is 
requested, issuing multiple WRITE macro instructions for the 
same record causes an error because the first WRITE macro 
instruction issued causes the output data in the output buffer 
to be translated into ISCII/ASCII code. 


If the OPEN macro instruction specifies UPDAT, both the READ and 
WRITE macro instructions must reference the same data event 
control block. See the list form of the READ or WRITE macro 
instruction for a description of how to construct a data event 
control block; see the execute form of the READ or WRITE macro 
instruction for a description of modifying an existing data 
event control block. 





The standard form of the WRITE macro instruction is written as 
follows (the list and execute forms are shown following the 
descriptions of the standard form): 


[symbol]| WRITE 








( dech name——symbol 
? specifies the name assigned to the data event control block 
created as part of the macro expansion. 


SF 
specifies normal, sequential, forward operation. 


dcb address—A-Type Address, or (2-12) 
specifies the address of the data control block for the 
opened data set being created or processed. If the data 
set is being updated, the data control block address must 
be the same as the dcb address operand in the corresponding 
READ macro instruction. 


area address—A-Type Address or (2-12) 
specifies the address of the area that contains the data . 
block to be written; if a key 1s written, the key must 
precede the data in the same area. 


length—symbol, decimal digit, absexp, (2-12) or 'S' 
specifies the number of bytes to be written; this operand 
1s specified for only undefined-length records CRECFM=U) or 
for ASCII records CRECFM=D) when the DCB BUFOFF operand is 
zero. For AL tapes, the maximum length is 2048 bytes; 
otherwise, the maximum length is 32760 bytes. ‘'S' can be 
coded to indicate that the value specified in the block 
size (DCBBLKSI) field of the data control block is used as 
the length to be written. The length operand should be 
omitted for all record formats except format-U and format-D 
Cwhen BUFOFF=0). 


If the length operand is omitted for format-U or format-D 
Cwith BUFOFF=0) records, no error indication is given when 
the program is assembled, but the problem program must 
insert a length into the data event control block before 
the WRITE macro is issued. 
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The WRITE macro instruction causes the system to adda block to 
the direct data set being created. For fixed-length blocks; the 
system writes the capacity record automatically when the current 
track is filled; for variable and undefined-length blocks, a 
WRITE macro instruction must be issued for the capacity record. 
Control may be returned before the block is written. The output 
operations must be tested for completion using a CHECK macro 
instruction. A data event control block, shown in 

Appendix A, "Status Information Following an Input/Output 
Operation" on page 190, is constructed as part of the macro 
expansion. 


The standard form of the WRITE macro instruction is written as 
follows (the list and execute forms are shown following the 
descriptions of the standard form): 


[symbol]]| WRITE 





decbh_ name——symbol 
specifies the name assigned to the data event control block 
created as part of the macro expansion. 


type— {SF|SFRISD|[SZ} 
1s coded as shown, to specify the type of write operation 
performed by the system: 


SF 
specifies that a new data block is to be written in 
the data set. 


SFR 
specifies that a new variable-length spanned record is 
to be written in the data set, and next address 
feedback is requested. This operand can be specified 
only for variable-length spanned records (BFTEKER and 
RECFM=VS are specified in the data set control block). 
If type SFR is specified, the next address operand 
must be included. 


SD 
specifies that a dummy data block is to be written in 
the data set; dummy data blocks can be written only 
when fixed-length records with keys are used. 

SZ 


specifies that a capacity record (RO) is to be written 
in the data set; capacity records can be written only 
oe variable-length or undefined-length records are 
used. 


dcb address—A-Type Address or (2-12) 
specifies the address of the data control block opened for 
the data set being created. DSORG=PS Cor PSU) and MACRF=WL 
must be specified in the DCB macro instruction to create a 
BDAM data set. 


—A-Type Address or (2-12) 

specifies the address of the area that contains the data 
block to be added to the data set. If keys are used, the 
key must precede the data in the same area. For writing 
capacity records (SZ), the area address is ignored and can 
be omitted (the system supplies the information for the 
capacity record). For writing dummy data blocks (SD), the 
area need be only large enough to hold the key plus one 
data byte. The system constructs a dummy key with the 
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WRITE 


first byte set to all 1 bits Chexadecimal FF) and adds the 
block number in the first byte following the key. When a 
dummy block is written, a complete block is written from 
the area immediately following the area address; therefore, 
the area address plus the value specified in the BLKSIZE 
and KEYLEN operands must be within the area allocated to 
the program writing the dummy blocks. 


length—symbol, decimal digit, absexp, (2-12), or ‘'S* 


is used only when undefined-length (RECFM=U) blocks are 
being written. The operand specifies the length of the 
block, in bytes, up to a maximum of 32760. If 'S' is 
coded, it specifies that the system is to use the length in 
the block size (DCBBLKSI) field of the data control block 
as the length of the block to be written. 


If the length operand is omitted for format-U records, no 
error indication is given when the program is assembled, 
but the problem program must insert a length into the data 
event control block before the WRITE is issued. 


—A-Type Address or (2-12) 
specifies the address of the area where the system places 
the relative track address of the next record to be 
written. Next address feedback can be requested only when 
variable-length spanned records are used. 


Note: When variable-length spanned records are used CRECFM=VS 
and BFTEK=R are specified in the data control block), the system 
writes capacity records (R00) automatically in the following 
cases: 


When a record spans a track. 


When the record cannot be written completely on the current 
volume. In this case, all capacity records of remaining 
tracks on the current volume are written; tracks not written 
for this reason are still counted in the search limit 
specified in the LIMCT operand of the data control block. 


When the record written is the last record on the track, the 
remaining space on the track cannot hold more than eight 
bytes of data. 
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WRITE 


COMPLETION CODES FOR WRITE--WRITE A BLOCK (CREATE A BDAM DATA SET WITH BSAM) 


Return 
Code 


00 


04 


08 


oc 


Note: 


After the write has been scheduled and control has been returned 


to the user' 


S program, 


the three high-order bytes of register 15 


are set to 0; the low-order byte contains one of the following 
return codes: 


Meaning 
Fixed-Length 
(SF or SD) 


Block will be written. 
CIf the previous 
return code was 08, 

a block is written 
only if the DD 
statement specifies 
secondary space 
allocation and 
sufficient space is 
available.) 


Block will be written, 
followed by a capacity 
record. CIf the 
previous return code 
was 08, a block is 
written only if the 

DD statement specifies 
secondary space 
allocation and 
sufficient space is 
available. ) 


Block will be written, 
followed by a capacity 
record. The next 
block requires 
secondary space 
allocation. 


Block will not be 
written; issue a 
CHECK macro 
instruction for the 
previous WRITE macro 
instruction, then 
reissue the WRITE 
macro instruction. 


For fixed-length records, 


Variable or Undefined-Length 


(SF or SFR) 


Block will be written. 
CIf the previous 
return code was 08, 

a block is written 
only if the DD 
statement specifies 
secondary space 
allocation and 
sufficient space is 
available. ) 


Block was not written; 
write a capacity record 
(SZ) to describe the 
current track, then 
reissue the WRITE macro 
instruction. 


Block will not be 
written; issue a 
CHECK macro 
instruction for the 
previous WRITE macro 
instruction, then 
reissue the WRITE 
macro instruction. 


(SZ) 


Capacity record was 


written; another track 


1s available. 


Capacity record was 
written. The next 
block requires 
secondary space 
allocation. This 
code is not issued 

if the WRITE SZ is 
the only WRITE macro 
instruction issued on 
a one-track secondary 
extent. 


Block will not be 
written; issue a 
CHECK macro 
instruction for the 
previous WRITE macro 
instruction, then 
reissue the WRITE 
macro instruction. 


the return codes are unpredictable when writing one 
record per track with one track per extent. 
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WRITE 


The list form of the WRITE macro instruction is used to 
construct a data management parameter list in the form of a data 
event control block (DECB). For a description of the various 
fields in the DECB for each access method, see 

Appendix A, "Status Information Following an Input/Output 
Operation" on page 190. 


The description of the standard form of the WRITE macro 
instruction provides the explanation of the function of each 
operand. The description of the standard form also indicates 
the operands used for each access method and the meaning of ‘'S' 
when coded for the area address, length, and Key address 
operands. For each access method, 'S' can be coded only for 
those operands for which it can be coded in the standard form of 
the macro instruction. The format description below indicates. 
the optional and required operands in the list form only, but 
does not indicate optional and required operands for any 
specific access method. 


The list form of the WRITE macro is written: 





decb_ name—symbol | 
type—Code one of the types shown .in the standard form 
deb address—A-Type Address 
area address—A-Type Address or 'S' 
length——symbol, decimal digit, absexp, or '‘'S' 
kev address—A-Type Address or *S' 
block address-—-A-Type Address 
next address—A-Type Address 
MF=L—-Coded as shown 
specifies that the WRITE macro instruction is used to 


create a data event control block that will be referenced 
by an execute-form instruction. 
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A remote rere management nepbwater list (data event control 
block) is used in, and can be modified by, the execute form of 
the WRITE macro instruction. The data event control block can 
be generated by the list form of either a READ or WRITE macro 
instruction. 


The description of the standard form of the WRITE macro 
instruction provides the explanation of the function of each 
operand. The description of the standard form also indicates 
the operands used for each access method and the meaning of ‘S' 
when coded for the area address, length, and key address 
operands. For each access method, 'S' can be coded only for 
those operands for which it can be coded in the standard form of 
the macro instruction. The format description below indicates 
the optional and required operands in the execute form only, but 
does not indicate the optional and required operands for any 
specific access method. 


The execute form of the WRITE macro instruction is written as 
follows: 





dech address—RX-Type Address or (2-12) 
type——Code one of the types shown in the standard form 
dcb address-—RX-Type Address or (2-12) 
area address—RX~Type Address, (2-12), or 'S! 
lenath—symbol, decimal digit, absexp, (2-12), or 'S' 

25s—RX-Type Address, (2-12), or 'S' 

) ess—RX-Type Address or (2-12) 

we RXS Type Address or (2-12) 
MF=E—-Coded as shown 
eee eee need and a ce otug cote iar e ccnteal 


block (specified in the operand) is to be used 
by the access method. 
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XLATE 


( The XLATE macro instruction is used to translate the data in an 
ise? area in virtual sterage from ISCII/ASCII code to EBCDIC code or 
from EBCDIC code to ISCII/ASCII code. 


To determine the ISCII/ASCII to EBCDIC or EBCDIC to ISCII/ASCII 
translation codes, see ANSI X3.26-]980 (American National 
Standard for Hollerith punch card code). When translating 
EBCDIC code to ISCII/ASCII code, all EBCDIC code not having an 
ISCII/ASCII equivalent is translated to X*1A'. When translating 
ISCII/ASCII code to EBCDIC code, all ISCII/ASCII cede not having 
an EBCDIC equivalent is translated to X'3F'. Because Version 3 
ISCII/ASCII uses only 7 bits in each byte, bit 0 is always set 
to 0 during EBCDIC to ISCII/ASCII translation and is expected te 
be 0 during ISCII/ASCII to EBCDIC translation. 


The XLATE macro is written: 





XLATE area_address | 





»length 
[,TO={A|E}] 


area address-——RX~Type Address, symbol, decimal digit, absexp, 
a Es hee 12), or (1) 
specifies the address of the area that is to be translated. 





length—symbol, decimal digit, absexp, (2-12), or (0) 
specifies the number cf bytes to be translated. 


TO={A|E} 
specifies the type of translation Kequeeted: If this 
operand is omitted, E is assumed. The following describes 
the characters that can be specified: 


( A 


specifies that translation from EBCDIC code to 
ISCII/ASCII code is requested 


specifies that translation from ISCII/ASCII code to 
EBCDIC code is requested 
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wt. 


PEND TX 


Following an input/output operation, the control program makes 
certain status information available to the problem program. | 
This information is a 2-byte exception code, or a l6-byte field 
of standard status indicators, or both Oe . 


Exception codes are provided in the data control block CQISAM), 
or in the data event control block (BISAM and BDAM). The data 
event control block is described below, and the exception code 
lies within the block as shown in the illustration for the data 
event control block. If a DCBD macro instruction is coded, the 
exception code in a data control block can be addressed as two 
l-byte fields, DCBEXCD1 and DCBEXCD2. The exception codes can 
be interpreted by referring to Figure 7 on page 191, Figure 8 on 
page 193, and Figure 9 on page 195. 


Status indicators are available only to the error analysis 
routine designated by the SYNAD entry in the data control block. 
A pointer to the status indicators is provided either in the 
data event control block CBSAM, BPAM, and BDAM), or in register 
0 CQISAM and QSAM). The contents of registers on entry to the 
SYNAD exit routine are shown in Figure 10 on page 197, Figure 1l 
on page 198, and Figure 12 on page 199. The status indicators 
are shown in Figure 13 on page 200. : 





A data event control block is constructed as part of the 
expansion of READ and WRITE macro instructions and is used to 
pass parameters to the control program, help control the read or 
write operation, and receive indications of the success or | 
failure of the operation. The data event control block is named 
by the READ or WRITE macro instruction, begins on a fullword 
boundary, and contains the tnrormatzon shown in the following 
illustration: 


Field Contents 
Offset from DECEB 


Address (Bytes) BSAM and. BPAM BISAM BDAM 

0 ECB ECB ECB? 

+4 Type Type | Type 

+6 Length | Length Length 

+8 DCB address DCB address DCB address 

+12 Area address Area address Area address 

+16 IOB address Logical record I0B address 
address 

+20 Key address Key address 

+24 Exception code Block address 
(2 bytes) 7 

+28 Next address 


i The control program returns exception codes in bytes +1 and 
+2 of the ECB. 
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( : The event control block (ECB) is used by the control program to 
= test for completion of the read or write operation. The ECB is 
located in the first word of the DECB. 


The type, length, data control block address, area address, key 
address, block address, and next address information is taken 
from the operands of the macro instruction and placed in the 
DECB for use by the control program. For BISAM, exception codes 
are returned by the control program after the corresponding WAIT 
or CHECK macro instruction is issued, as indicated in Figure 7. 
For BDAM, BSAM, BPAM, and QSAM, the control program provides a 
pointer to the IOB containing the status indicators shown in 
Figure 13 on page 200. 








Exception 
Code Bit 
in DECB READ WRITE Condition if On 
0 X Type K Record not found 
i X X Record length check 
2 Type KN Space not found 
3 Type K Invalid request 
G X Uncorrectable I70 
error 
X Unreachable block 


Overflow record? 


Type KN Duplicate record 


mar. 
oN DH uw 


~15 Reserved for 
control program use 


Figure 7. Exception Code Bits-—BISAM 


1 The SYNAD exit routine is entered only if the CHECK macro is 
issued after the READ macro, and bit 0, 4, 5, or 7 is also 
on. 


Notes to Figure 7: 


Record Not Found: This condition is reported if the logical 
record with the specified key is not found in the data set, if 
the specified key is higher than the highest key in the highest 
level index, or if the record 1s not in either the prime area or 
the overflow area of the data set. 


Record Length Check: This condition is reported, for READ and 
update WRITE macro instructions, if an overriding length is 
specified and (1) the record format is blocked, (2) the record 
format is unblocked but the overriding length is greater than 
the length Known to the control program, or (3) the record is 
fixed length and the overriding length does not agree with the 
length known to the control program. This condition is reported 
for the add WRITE macro instruction if an overriding length is 
specified. 


When blocked records are being updated, the control program must 
find the high key in the block in order to write the block. 

(The high key is not necessarily the same as the key supplied by 
the problem program.) The high key is needed for writing 
because the control unit for direct access devices permits 
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writing only if a search on equal is satisfied; this search can 
be satisfied only with the high key in the block. If the user 
were permitted to specify an overriding length shorter than the oa 
block length, the high key might not be read; then, a subsequent oe 
write request could not be satisfied. In addition, failure to 

write a high key during update would make a subsequent update 
impossible. 





Space Not Found for Adding a Record: This condition is reported 
if no room exists in either the appropriate cylinder overflow 
area or the independent overflow area when a new record is to be 
added to the data set. The data set is not changed in any way 
in this situation. 


Invalid Request: This condition is reported for either of two 
reasons. First, if byte 25 of the data event control block 
indicates that this request is an update WRITE macro instruction 
corresponding to a READ (Cfor update) macro instruction, but the 
input/output block CIOB) for the READ is not found in the update 
queue. This condition could be caused by the problem program 
altering the contents of byte 25 of the data event control 
block. Second, if a READ or WRITE macro instruction specifies 
dynamic buffering (that is, 'S' in the area address operand) but 
the DCBMACRF field of the data control block does not specify 
dynamic buffering. 


Uncorrectable Input/Output Error: This condition is reported if 
the control program's error recovery procedures encounter an 
uncorrectable error in transferring data. 


Unreachable Block: This condition is reported if an 
uncorrectable input/output error occurs while searching the 
indexes or following an overflow chain. It is also posted if 
the data field of an index record contains an improper address 
Scene points to the wrong cylinder or track or is an invalid 
address). 


Overflow Record: This condition is reported if the record just ah 
read is an overflow record. (See the section on direct 
retrieval and update of an indexed sequential data set in Data 

in] j j for considerations during BISAM updating. ) 


Duplicate Record Presented for Inclusion in the Data Set: This 
condition is reported if the new record to be added has the same 
key as a record in the data set. However, if the delete option 
was specified and the record in the data set is marked for 
deletion, this condition is not reported. Instead, the new 
record replaces the existing record. 


If the record format is blocked and the relative key position is 
zero, the new record cannot replace an existing record that is 
of equal key and is marked for deletion. 
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Exception Code 


Field 
DCBEXCD1 


DCBEXCD2 


Figure 8. 


Bit 
0 
1 


3 
4 
5=7 


Code Set by 
CLOSE GET PUT PUTX SETL Condition if On 
Type K Record Not Found 


Type I Invalid actual address 
for lower limit 


X Space not found for 
adding a record 


X Invalid request 
X Uncorrectable input error 


xX X X Uncorrectable output 
error 


X xX Block could not be 
reached Cinput) 


xX xX Block could not be 
reached Cupdate) 


Sequence check 
Duplicate record 
X Data control block 
closed when error 
routine entered 
X Overflow record? 


X Incorrect record length 


Reserved for future use 


Exception Code Bits-—QISAM 


1 The SYNAD exit routine is entered only if bit 4, 5, 6, or 7 
of DCBEXCD1 is also on. 


Notes to Figure 8: 


Record Not Found: This condition is reported if the logical 
record with the specified key is not found in the data set, if 
the specified key is higher than the highest key in the highest 
level index, or if the record is not in either the prime area or 
the overflow area of the data set. 


Invalid Actual Address for Lower Limit: This condition is 
reported if the specified lower limit address is outside the 
space allocated to the data set. 


Space Not Found for Adding a Record: This condition is reported 
if the space allocated to the data set is already filled. In 
locate mode, a buffer segment address is not provided. In move 
mode, data is not moved. 


Invalid Request: This condition is reported if (1) the data set 
is already being referred to sequentially by the problem 
program, (2) the buffer cannot contain the key and the data, or 
(3) the specified type is not also specified in the DCBMACRF 
field of the data control block. 


Appendix A. Status Information Following an Input/Output Operation 193 











Uncorrectable Input Error: This condition is reported if the _ 

control program's error recovery procedures encounter an fo 

uncorrectable error when transferring a block from secondary . y 

storage to an input buffer. The buffer address is placed in a 
register 1, and the SYNAD exit routine is given control when a 

GET macro instruction is issued for the first logical record. 


Uncorrectable Output Error: This condition is reported if the 
control program's error recovery procedures encounter an 
uncorrectable error when transferring a block from an output 
buffer to secondary storage. If the error is encountered during 
closing of the data control block, bit 2 of DCBEXCD2 is set to ] 
and the SYNAD exit routine is given control immediately. 
Otherwise, control program action Gepends on whether load mode 
or scan mode is being used. 


If a data set is being created Cload mode), the SYNAD exit 
routine 1S given control when the next PUT or CLOSE macro 
instruction is issued. In the case of a failure to write a data 
block, register 1] contains the address of the output buffer, and 
register 0 contains the address of a work area containing the 
first 16 bytes of the IOB; for other errors, the contents of 
register 1 are meaningless. After appropriate analysis, the 
SYNAD exit routine should close the data set or end the job 
step. If records are to be subsequently added to the data set 
using the queued indexed sequential access method (QISAM), the 
job step should be terminated by issuing an abend macro 
instruction. (CAbend closes all open data sets. However, an 
ISAM data set is only partially closed, and it can be reopened 
in a later job to add additional records by using QISAM) 
Subsequent execution of a PUT macro instruction would cause 
reentry to the SYNAD exit routine, because an attempt to 

coe tue loading the data set would produce unpredictable 
results 


If a data set is being processed (scan mode), the address of the 

output buffer in error is placed in register 1, the address of a ee 
work area containing the first 16 bytes of the IOB is placed in “os 
register 0, and the SYNAD exit routine is given control when the 

next GET macro instruction is issued. Buffer scheduling is 

suspended until the next GET macro instruction is reissued. 


Block Could Not Be Reached (Input): This condition is reported 
if the control program's error recovery procedures encounter an 
uncorrectable error in searching an index or overflow chain. 
The SYNAD exit routine is given control when a GET macro 
instruction is issued for the first logical record of the 
unreachable block. 


Block Could Not Be Reached (Update): This condition is reported 
if the control program's error recovery procedures encounter an 
uncorrectable error in searching an index or overflow chain. 


If the error is encountered during closing of the data control 
block, bit 2 of DCBEXCD2 is set to 1 and the SYNAD exit routine 
1S given control immediately. Otherwise, the SYNAD exit routine 
is given control when the next GET macro instruction is issued. 


Sequence Check: This condition is reported if a PUT macro 
instruction refers to a record whose key has a smaller numeric 
value than the key of the record previously referred to by a PUT 
macro instruction. The SYNAD exit routine is given control 
immediately; the record is not transferred to secondary storage. 


Duplicate Record: This condition is reported if a PUT macro 
instruction refers to a record whose key duplicates that of the 
record previously referred to by a PUT macro instruction. The 
SYNAD exit routine is given control immediately; the record is 
not transferred to secondary storage. 
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Data Control Block Closed When Error Routine Entered: This 
condition is reported if the control program's error recovery 
procedures encounter an uncorrectable output error during 
closing of. the data control block. Bit 5 or 7 of DCBEXCD1 is 
set to 1, and the SYNAD exit routine is immediately given 
control. After appropriate analysis, the SYNAD routine must 


branch to the address in return register 14 so that the control 


Program can finish closing the data control block. 


Overflow Record: This condition is reported if the input record 


1s an overflow record. , 


Incorrect Record Length: This condition is reported if the 


length of the record as specified in the record-descriptor word 
CRDW) is larger than the value in the DCBLRECL field of the data 


control block. 


Code Bit’ READ WRITE Condition if On 
~—6(0 X X Record not found 
1 X X Record length check 
2 x Space not found 
3 x x Invalid request—see bits 9-15 
4 X X Uncorrectable 1/0 error 
5 X X End of data 
6 X X Uncorrectable error 
7 X Not read with exclusive control 
8 Not used 
9 x WRITE to input data set 
10 Extended search with DCBLIMCT=0 
11 Block or track requested was 
outside data set 
12 X Tried to write capacity record 
13 X X Specified key as search argument 
when KEYLEN=0 or no key address 
supplied 
14 X X Request for options not in data 
control block 
15 X Attempt to add fixed-length 


record with key beginning with 
hexadecimal FF 


Figure 9. Exception Code Bits-——-BDAM 


Notes to Figure 9: 


Record Not Found: This condition is reported if the search 
argument is not found in the data set. 
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Record Length Check: This condition occurs for READ and WRITE 


Cupdate) and WRITE Cadd). For WRITE Cupdate) variable-length fo 
records only, the length in the BDN does not match the length of ‘eo 
the record to be updated. For all remaining READ and WRITE ae 


(update) conditions, the BLKSIZE, when 'S' is specified in the 
READ or WRITE macro, or the length given with these macros does 
not agree with the actual length of the record. For WRITE 
(add), fixed-length records, the BLKSIZE, when 'S' is specified 
in the WRITE macro, or the length given with this macro does not 
agree with the actual length of the record. For WRITE Cadd), 
all other conditions, no error can occur. 


Space Not Found for Adding a Record: This condition occurs if 
either there is no dummy record when adding an F-format record, 
or there is no space available when adding a V- or U-format 
record. | 


Invalid Request: Occurs whenever one of the following bits is 
set to one: 


Bit Meaning 
9 A NRITE was attempted for an input data set. 
10 An extended search was requested, but LIMCT was zero. 


ll The relative block or relative track requested was not in 
the data set. 


12 Writing a capacity record (RO) was attempted. 


13 A READ or WRITE with key was attempted, but either KEYLEN 
equaled zero or the Key address was not supplied. 


14 The READ or WRITE macro request options conflict with the 
OPTCD or MACKF parameters. 


15 A WRITE Cadd) with fixed length was attempted with the key a 
beginning with X'FF?, 


Uncorrectable Input/Output Error: This condition is reported if 
the control program's error recovery procedures encounter an 
uncorrectable error in transferring data between real and 
secondary storage. 


End of Data: This only occurs as a result of a READ (type DI, 
DIF, or DIX) when the record requested is an end-of-data record. 


Uncorrectable error: Same conditions as for bit 4. 
Not Read with Exclusive Control: <A WRITE, type DIX or DKX, has 


occurred for which there is no previous corresponding READ with 
exclusive control. 
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Register 
0 


i5 


Figure 10. 
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Bits 


8-31 


O-7 
8-31 


Meaning 


Bit O0=1 indicates that bits 8-3] 

hold the address of the key in error 
Conly set for a sequence error). 

If bit O=l—address of key that is 
out of sequence. If bit 0=0-—address 
of a work area. 


Not used. 

Address of a work area containing 
the first 16 bytes of the IOB 

(after an uncorrectable 

input/outeut error caused by a 

GET, PUT, or PUTX macro instruction; 
original contents destroyed in other 
cases). If the error condition was 
detected before I/G was started, 
register 0 contains all zeros. 


Not used. 

Address of the buffer containing 

the error record Cafter an 
uncorrectabie input/output error 
caused by a GET, PUT, or PUTX macro 
instruction while attempting to 

read or write a data record; in other 
cases, this register contains 0). 


Contents that existed before the 
macro instruction was issued. 


Not used. 

Return address. This address is 
either an address in the control] 
program's clese routine (bit 2 of 
DCBEXCD2 is on}, or the address of 
the instruction following the 
expansion of the macro instruction 


that caused the SYNAD exit routine to be 


given control Cbit 2 of BDCBEXCD2 is 
off). 


Not usec. 
Address of the SYNAD exit routine. 
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197 





Register Bits 
0. 0-7. 
: 8-31 

1 0-7 
8-31 

2-13 0-31 
14° 0-7 
8-31 

415 | 0-7 
| 8-31 

Figure ll. 


Meaning 


- Not used. 


Address of the first IOB sense 
byte. (Sense information is 
valid only when associated with 
a unit check condition. } 


Not used. 
Address of the DECB. 


Contents that existed before the 
macro instruction was issued. 


Not used. 
Return address. 


Not used.., 
Address of the SYNAD exit routine. 


Register Contents on Entry to SYNAD Routine-——BISAM 
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( Register Bits Meaning 


0 0-7 Value to be added to the 
status indicator's address to 
provide the address of the 
first CCW (QSAM only). 

8-31 Address of the associated 
data event control block for 
BDAM, BPAM, and BSAM; address 
of the status indicaiecrs shown 
in Figure 13 for QSAM. 


1 0 Bit 1s on for error caused by 
input operation. 
l Bit is on for error caused by 
output operation. 
2 Bit is on for error caused by 


BSP, CNTRL, or POINT macro 
instruction (BPAM AND BSAM only). 

3 Bit 1s on if error occurred 
during update of existing record 
or if error did not prevent 
reading of the record. Bit is. 
off if error occurred during 
creation of a new record or if 
error prevented reading of the 
record. 

G Bit is on if the request was 
invalid. The status indicators 
pointed to in the data event 
control block are not present 
CBDAM, BPAM, and BSAM only). 








5 Bit is on if an invalid character 
ae was found in paper tape conversion 
( CBSAM and QSAM only). 
6 Bit is on for a hardware error 
CBDAM only). 
7 Bit is on if no space was found 


for the record (BDAM only). 
8-31 Address of the associated data 
control block. 


2-13 0-31 Contents that existed before the 
macro instruction was issued. 


14 0-7 Not used. 
8-31 Return address. 
0-7 
8-3 


15 Not used. 
1 Address of the error analysis 


routine. 


Figure 12. Register Contents on Entry to SYNAD Routine-——BDAM, 
BPAM, BSAM, and QSAM 
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Offset From 
IOB Address 


Byte Bit 
+2 0 

] 

2 

3 

4 

5 

6,7 
+3 0-7 


Meaning Name 


Command reject Sense byte 1 
Intervention required 
Bus~out check 

Equipment check 

Data check 

Overrun 

Device-dependent information; 
see the appropriate device 
manual | 

Device-dependent information; 
see the appropriate device 
manual 


Sense byte 2 


The following bytes make up the low-order seven bytes of 
the channel status word: 


+9 = 
+12 0 
l 
2 
3 
G 
5 
6 
7 
+13 0 
l 
2 
3 
G 
5 
6 
7 
+14 — 
Figure 13. 
Note: 


OS cag Indicators for the SYNAD Routine—BDAM, 
P 


If the sense bytes are X'10FE', 


Command address 


Attention 

Status modifier 

Control unit end 

Busy 

Channel end 

Device end 

Unit check-——must be on for 
sense bytes to be meaningful 
Unit exception 


Status byte 1 
CUnit) 


Status byte 2 
(Channel ) 


Program-controlled interrupt 
Incorrect length 

Program check 

Protection check 

Channel data check 

Channel control check 
Interface control check 
Chaining check 


Count field (2 bytes) 


BPAM, 
and QSAM 


the control program has 


set them to this invalid combination because sense bytes could 
not be obtained from the device because of recurrence of unit 


checks. 


The event control block is used for communication between the 
various components of the system and between problem programs 


and the system. 


An event control block is the subject of WAIT 


and POST macro instructions. 
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Bytes and Hex. 
Offset Alignment Code Bit Dig. Description 


00 ] 10xx ™xxxx W—Waiting for completion of an event. 


l 3 Contains the address of the RB 
issuing the WAIT macro if the ECB 
has the WAIT bit on. Once the event 
has completed and the ECB is posted, 
the C bit is set with other bits in 
byte 0 and these 3 bytes (1-3) are 
zero, for all access methods 
except BDAM. Exception codes are 
returned in bytes 1 and 2 of the 
ECB for BDAM. 


00 Olxx xxxx C—The event has completed. 
One of the following completion codes 
will appear at the completion of a 
channel program: 


Access Methods other than BTAM 


Oll11 1111 7F Channel program has terminated without 
error. (CSW contents useful. ) 

0100 0001 41 Channel program has terminated with 
permanent error. (CSW contents useful.) 

0100 0010 42 Channel program has terminated because 


a direct access extent address has been 
violated. (CSW contents do not apply.) 


0100 O011 43 I/0 abend condition occurred 
while loading the error recovery 
routine. (CSW contents do 
not apply. ) 


0100 0100 44 Channel program has been intercepted 
because of permanent error associated 
with device end for previous request. 
You may reissue the intercepted 
request. (CSW contents do not apply.) 


0100 1000 48 Request element for channel program 
has been made available after it has 
been purged. CCSW contents do not apply. ) 


0100 1011 GB One of the following errors occurred 
during tape error recovery processing: 


¢ The CSW command address in 
the IOB was zeros. 


¢ An unexpected load point was 
encountered. (CSW contents do not 
apply in either case.) 


0100 1111 GF Error recovery routines have been 
entered because of direct access error 
but are unable to read home addresses 
or record 0. (CSW contents do not apply.) 


0101 0000 50 Channel program terminated with error. 


Input block was a DOS~embedded checkpoint 
record. (CSW contents do not apply.) 
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i ea 
w. 
-. 
> 

a. 
Be 
Re. 
x= 
i] 

». 
Be 
i _< 
-. 
: 
Be 
ld 

= 
. 
wv 

2 
wr. 

Be 
| ae 
ie 
ge 
x= 

= 

= 
—™ 


Macro Instruction BDAM BISAM BPAM BSAM QISAM QSAM 


BLDL X 
BSP 

BUILD X x xX 
BUILDRCD 


CHECK 
CHKPT 
CLOSE 
CNTRL 


DCB X xX X 
DCBD X X X 


ESETL 


FEOV 
FIND 
FREEBUF 
FREEDBUF 
FREEPOOL 


GET 
GET BUF 
GETPOOL 


MSGDISP 
NOTE 
OPEN X X 


PDAB 

PDABD 

POINT X 
PRTOV 

PUT x 
PUTX X 


READ X xX X X 
RELEX xX 
RELSE 


SETL 
SETPRT 
STOW 
SYNADAF 
SYNADRLS 
SYNCDEV 


TRUNC 


WAIT X X 
NRITE X X 


XLATE X X 


~x< 
~x< 
mM XK 


mM OK OK 
mM MK OK 
mK << X< 
~< MK KK KOK 
MK >< 
~< MM KOK OK 


<< XK X< 
~< 

~< 

~< 


<< 
<>< 
< XK «K XK 
<x~ KK «K XK 


<< KM MRM RK 
x K~ KR WRK 


<< 
x< MMM KK OOK 


mM WK OX 

m< OK OK 

x mK MK OX 

MK MK OK 

<< >< 
x KMKK XK 


<< 
mK 
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The following information provides a guide to coding the block 
size (BLKSIZE) and logical record length (LRECL) operands in the 
DCB macro instruction. These values can be used to determine 
the maximum block size and logical record length for a given 
device, and they can be used to determine the optimum blocking 
factor when records are to be blocked. 





Format F, V, or U records are accepted by readers and punches, 
but the logical record length for a card reader or card punch is 
fixed at 80 bytes. If the optional control character is 
specified, the logical record length is 81 (the control 
character is not part of the data record). If card image mode 
ay hae the buffer required to contain the data must be 160 
ytes. 


The following table shows the record length that can be 
specified for the various printers. In some cases, two values 
are shown; except for the 3800, the larger of the two values 
requires that an optional feature be installed on the printer 
being used. If the optional control character is specified to 
control spacing and skipping, the record length is specified as 
one greater than the actual data length (the control character 
is not part of the data record). 


Printer Record Length 
14903 Printer 120 or 132 bytes 
3203 Printer 132 bytes 

3211 Printer 132 or 150 bytes 
3525 Card Punch, 

Print Feature 64 bytes 


3800 Printing Subsystem 136 bytes for 10 pitch 
163 bytes for 12 pitch 
20% bytes for 15 pitch 


3480 Magnetic Tape Subsystem 32760 bytes 
(18 track) 





The following table shows the capacity of direct access devices 
by track, cylinder, and total capacity in bytes. 
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“Maximum Block Number of = =—~—~«CWMT rack = 





oy 
; Size/Track Tracks per Cylinders Capacity P 

Device (Note 1) Cylinder (Notes 1 and 2) (Bytes) ase 

2305-2 14660 8 96 148586 

3330/3333 13030 19 G04 131656 

(Model 1) | 

3330/3333 13030 19 808 131656 

(Model 11) | 

3340/33644 8368 12 696 85356 

3350 19069 30 555 192546 

3375 | 327605 12 959 | 360006 

3380 (Models 327603 15 885 479686 

AO0G, AAG, and 

BOG) 

3380 (Models 327603 15 885 479686 

ADG and BD4) 

3380 (Models 327605 15 1770 479686 


AE4 and BE4) 


i Capacity indicated in bytes (when RO is used by the IBM 
programming system). 


7 Excludes alternate cylinders. 


. The Mass Storage System (MSS) virtual volumes assume the Sasa 
characteristics of the 3350/3353, Model 1 


4 The 3344 is functionally equivalent to the 3340 Model 70. 


5 The largest record that can be written on a track for the 
3375 is 35616 and for all 3380 models is 47476. However, 
for these devices the largest block size supported by the 
standard access methods is 32760. 


6 This value is different from the maximum block size per 
track because each block on the track includes an overhead 
for this device. 


Each record written on a direct access device requires some 
"device overhead.' The term device overhead means the space 
required by the device for address markers, count areas, gaps 
between the count, Key, and data areas, and gaps between blocks. 
The following calculations can be used to compute the number of 
bytes required for each data block including the space required 
for device overhead. Note that any fraction of a byte must be 
ignored. For example, if the calculation results in 15.644 
bytes, 15 bytes must be used to determine track capacity. 





204 MVS/XA Data Administration: Macre Instruction Reference 











Device 
2305-2 


3330/3333 (Medel 1 or 
11) 


3340/3344 
33590 
3375 
3380 (Models A0G%, AAG; 
and B04) 
| 3380 (Models ADG and BDG) 


| 3380 (Models AE4 and BE4) 


t KL 
@ DL 


Blocks 
With Keys 


Z2894+KL1+DL4 
1914+KL+DL 


2424+KL+DL 
267+KL+DL 


2244+ CC KL4+191)732)0352)4+ 
CC DL4+1913732)032) 


25640 CKL +267 9732) 032)+ 
CCDL4+267)/323(032) 


25640 (KL 42679732) 032)+ 
€CDL4+2671)732)(032) 


25640 CKL 426797323 032)+ 


Biocks 
Without Keys 


198+DL 
135+DL 


167+DL 
185+DL 
2244+ C0 CDL4191)9732)0323 


256+(CDL4+267)732)032) 
256400 DL4+267)9732)032) 


256+CCDL4+267)732)032) 


CC DL4+267)/32)032) 


is key length. 


is data length. 


3 The Mass Storage System (MSS) virtual volumes assume the 
characteristics of the 3330/3333, Model 1 


When track overflow is used or variable-length spanned records 


are written, 


the size of a data block or logical record can 


exceed the capacity of a single track on the direct access 
device used. | 
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The following shows the format and contents that must be 
supplied by the problem program when the EXLST operand is 


specified in a DCB macro instruction. 


The exit list must begin 


on a fullword boundary and each entry in the list requires one 


fullword. 

Entry Type Code 
Inactive entry 00 
Input header label exit 061 
Output header label 02 
exit 
Input trailer label 03 
exit 
Output trailer label 04 
exit 
Data control block exit 05 
End-of-volume exit 06 
JFCB exit 07 

08 

09 
User totaling area 0A 
Block count exit 0B 
Defer input trailer oc 
label 
Defer nonstandard input 0D 
trailer label 

OE-OF 
FCB image 10 
DCB abend exit 11 
QSAM parallel input 12 

13-14 
JFCBE exit 15 

16 
OPEN’“EOV nonspecific 17 


tape volume mount 
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3-Byte Address~~Purpose 


Ignore the entry; it is not active. 
Process a user input header label. 


Create a user output header label. 


Process a user input trailer label. 


Create a user output trailer label. 


Take a data control block exit. 


Take an end-of-volume exit. 


JFCB address for RDJFCB and OPEN TYPE=J SVCs. 


Reserved. 


Reserved. 


Address of beginning of user's totaling area. 


Take a block-count-unequal exit. 


Defer processing of a user input trailer label from 


end-of-data until closing. 


Defer processing a nonstandard input trailer label 
on magnetic tape unit from end-of-data until 


closing (no exit routine address). 
Reserved. 
Define an FCB image. 


Examine the abend condition and select 
several options. 


Address of the PDAB for which this DCB 
Reserved. 

Take an exit during OPEN to allow user 
JCL=specified setup requirements for a 
printer. 


Reserved. 


Option to specify a tape volume serial 


Macro Instruction Reference 


one of 


1S a member. 


to examine 
3800 


number. 











Entry Type 


OPEN“EOV volume 


Hex 
Code 3-Byte Address~Purpose 


18 Verify a tape volume and some security checks. 


security/verification 


Last entry 


19-7F Reserved. 


80 Treat this entry as the last entry in the list. 
This code can be specified with any of the above 
but must always be specified with the last entry. 


The list can be dynamically shortened during execution by 
setting the high-order bit of the word to a value of l. An 
entry in the list can be made inactive dynamically by setting 
the high-order byte of the word to a value of hexadecimal 00. 


When control is passed to an exit routine, the general registers 
contain the following information: 


Register Contents 


0 Variable; the contents depend on the exit routine 
used. 
1 The three low-order bytes contain either the address 


of the DCB currently being processed or, when certain 
exits are taken, the address of the exit parameter 
list. These exits are: user-label exits CX'O1'-'04'), 
deferred nonstandard input trailer exit (X'0D'"), and 
DCB abend exit (X'11'). 


2-13 Contents prior to execution of the macro instruction. 

14 Return address (must not be altered by the exit 
routine). 

15 Address of the exit routine entry point. 


The conventions for saving and restoring registers are as 
follows: 


¢ The exit routine must preserve the contents of register 14. 
It need not preserve the contents of other registers. The 
control program restores registers 2 through 13 before 
returning control to the problem program. 


@ The exit routine must not use the save area whose address is 
in register 13, because this area is used by the control 
program. If the exit routine calls another routine or 
issues supervisor or data management macro instructions, it 
must provide the address of a new save area in register 13. 


For a detailed description of each exit list processing option, 
see ; 
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Each logical record, in all record formats, can contain an 
optional control character. This control character is used to 
control stacker selection on a card punch or card read punch, or 
it is used to control printer spacing and skipping. If a record 
centaining an optional control character is directed to any 
other device, it 1s considered to be the first data byte, and it 
does not cause a control function to occur. 


In format-F and format-U records, the optional control character 
must be in the first byte of the logical record. 


In format-V or format-D records, the optional control character 
must be in the fifth byte of the logical record, immediately 
following the record descriptor word of the record. 


Two control character options are available. A control 
character option is selected by coding the appropriate character 
in the RECFM operand of the DCB macro instruction. If either 
option is specified in the data control block, a control 
character must be included in each record, and other spacing or 
stacker selection options also specified in the data control 
block are ignored. 


The record format field in the data control block indicates that 
the machine code control character has been placed in each 
logical record. If the record is written, the appropriate byte 
must contain the command code bit configuration specifying both 
the write and the desired carriage or stacker select operation. 
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The machine code control characters for a printer are: 








Print--Then Act Immediately 
Act Action Without Printing 
X'ol1' Print only (no 
space) 

X'09° Space 1 line X'OB' 

X*lli' Space 2 lines APTS" 

X'19" Space 3 lines X"1B! 

X'89! Skip to channel 1 X"8B! 

» a ee Skip to channel 2 X*95* 

X'99! Skip to channel 3 X'OB! 

X*"Al* Skip to channel 4 X*A3' 

X*A9* Skip to channel 5 X"AB! 

X*B1! Skip to channel 6 X*B3! 

X"B9* Skip to channel 7 X"BB! 

X'C1' Skip to channel 8 XtCS* 

X'C9! Skip to channel 9 X'CB! 

X'p1' Skip to channel 10 X'D3!* 

X'D9!* Skip to channel 11 X"DB! 

X'El' Skip to channel 12 X'E3! 


The machine code control characters for a card read punch device 
are as follows: 


Control Code Action 

X'ol1' Select stacker 1 

X'41' Select stacker 2 

X*5A'1 Change from line 
mode to page mode 

X81! Select stacker 3 


i The 3800 Model 3 all-points-addressable mode uses this code 
to change from compatibility to page mode. 


Other command codes for specific devices are contained in IBM 


System Reference Library publications describing the control 
units or devices. 
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In place of machine code, control characters defined by the -_ 
International Organization for Standardization (IS0), American te 
National Standards Institute CANSI), or the Federal Information = 
Processing Standards (FIPS) can be specified. These characters 

must be represented in EBCDIC code. 


International Organization for Standardization (ISO), American 
National Standards Institute CANSI), or Federal Information 
Processing Standards (FIPS) control characters are as follows: 


Code Action before Printing a Line 
b Space one line (blank code) 
0 Space two lines 


Space three lines 
Suppress space 
Skip to channel 
Skip to channel 
Skip to channel 
Skip to channel 
skip to channel 
Skip to channel 


Skip to channel 


oN DW i DH WwW KN Oe 


Skip to channel 


\o 
4A 


Skip to channel 


— 
© 


Skip to channel 


pt 
put 


Skip to channel 
Skip to channel 12 


Ow > Oo OoOeON NHN ON ODN we N = + 


Code | Action after Punching a Card 

V | Select punch pocket 1 

W 7 | Select punch pocket 2 

X* 5A"? Change from line mode to page mode 


1 The 3800 Model 3 all-points-addressable mode uses this code 
to change from compatibility to page mode. 


These control characters include those defined by ANSI FORTRAN. 
If any other character is specified, it is interpreted as '"b'*' or 
ee on the device being used; no error indication is 
returned. 
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The following describes data control block fields that contain 
information that defines the data characteristics and device 
requirements for a data set. Each of the fields described shows 
the values that result from specifying various options in the 
DCB macro instruction. These fields can be referred to by the 
problem program through the use of a DCBD macro instruction that 
creates a dummy control section (DSECT) for the data control 
block. Fields that contain addresses are 4@ bytes long and are 
aligned on a fullword boundary. If the problem program inserts 
an address into a field, the address must be inserted into the 
ee 3 bytes of the field without changing the high-order 
byte. 








The contents of some fields in the data control block depend on 
the device and access method being used. A separate description 
1S provided when the contents of the field are not common to all 
device types and access methods. 
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Bytes and Field a aed 
Offset Alignment Name Description 
26(1A) 2 DCBDSGORG Data set organization. 
Code 
Sige Is Indexed sequential. 
oe ante Mocs PS Physical sequential. 
a oe ra tee DA Direct organization. 
SX ~3OCe Reserved bits. 
oy ie PO Partitioned organization. 
me U Unmovable—the data set contains 
location-dependent information. 
GOC28) 8 DCBDDNAM Exoht~byte name of the data definition 


statement that defines the data set associated 
with this DCB. (Before DCB is opened.) 


G0(¢283 2 BDCBTIOT (After DCB is opened.) Offset from the TIOT 
| origin to the TIOELNGH field in the TIOT entry 
for the DD statement associated with this DCB. 


42C2ZA) 2 DCBMACRFE This field may only be referenced during 
and after OPEN. It is common to all uses 
of the DCB and is created by moving the 
DCBMACR field into this area. 


G5¢2D) .3 DCBDEBA (After DCB 1s opened.} Address of the 
associated DEB. 
48¢30) ] DCBOFLGS Flags used by open routine. 
Seer ae eer OPEN has completed successfully. 
Tes Set to 1 by problem program to indicate 
concatenation of unlike attributes. 
i Os set to 0 by an I/0 support function when ey? 
that function takes a user exit. It is 


set te 0 to inhibit other I/0 support 
functions from processing this DCB. 


re eee Set to 1 on return from the user exit to 
the I/O support function that took the exit. 

§0¢32) ..2 DCBMACR Macro instruction reference before OPEN. 
(Before Major macro instructions and various options 

OPEN) associated with them. Used by the open 


routine to determine access method. Used by 
the access method executes in conjunction 
with other parameters to determine which load 
modules are required. This field is moved to 
overlay part of DCBDDNAM at open time and 
becomes the DCBMACRF field. 


This field is common to all uses of the DCB, 
but each access method must be referenced for 
its meaning. 
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DATA CONTROL BLOCK="BPAM, BSAM,» QSAM 


Offset 
20¢614) 


21¢€15) 
24018) 


32020) 


32¢20) 


33021) 


Bytes and Field 
Alignment Name 


1 


1 


3 


DCBBUFNO 


DCBBUFCB 
DCBBUFL 

DCBBFALN 
ao eter ~ 9 OO 


..10 
.O1 


DCBBFTEK 
- XXX 
1.0 
110 


.010 


DCBEODAD 


Appendix F. 


Description 


Number of buffers required for this data set. 
May range from 0 to a maximum of 255 


Address of buffer pool control block. 


Length of buffer. May range from 0 to a 
maximum of 32760. 


Buffer Alignment: 

Reserved bits. 

Doubleword boundary. 

Fullword not a doubleword boundary, 
coded in the DCB macro instruction. 


Buffering technique: 

Reserved bits. 

Simple buffering. 

QSAM locate mode processing of spanned 
records: OPEN is to construct a record 
area if it automatically constructs 
buffers. 


BSAM create BDAM processing of unblocked 
spanned records: Software track 
overflow. OPEN forms a segment work 
area pool and stores the address of the 
segment work area control block in 
DCBECBW. However, WRITE uses a 

segment work area to write a record as 
one or more segments. 


BSAM input processing of unblocked 
spanned records with keys: Record offset 
processing. READ reads one record 
segment into the record area. The first 
segment of a record is preceded in the 
record area by the key. Subsequent 
segments are at an offset equal to the 
key length. 


Reserved bit. 


XLRI being used to process a RECFM=DS or 
RECFM=DBS format tape data set (QSAM). 


End-of-data address. Address of a 
user-provided routine to handle end-of-data 
conditions. 
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Bytes and Field 








| Offset Alignment Name Description fs 
| 36(24) 1 DCBRECFM Record format. hed 
Code 
001. : D Format-D record. 
10.. ; F Fixed record length. 
O1.. V Variable record length. 
ll.. U Undefined record length. 
el. T Track overflow. 
ol B Blocked records. May not occur with 
undefined (U). 
| ie S Fixed length record format: Standard 
blocks. (No truncated blocks or 
unfilled tracks are embedded in the 
data set.) Variable length record 
format: Spanned records. | 
Speer ses A ISO/ANSI/FIPS control character. 
whew <b M Machine control character. 
.00. No control character. 
wl Key length CKEYLEN) was specified 
in the DCB macro instruction. This 
bit is inspected by the Open to 
prevent overriding a specification 
of KEYLEN=0 by a nonzero specifi- — 
cation in the JFCB or data set 
label. 
37(€25) = .3 DCBEXLST Exit list. Address of a user- Rives exit 
list control block. 
| G2(2A) 2 DCBMACRF Macro instruction reference after OPEN. 
| Contents and meaning are the same as those of 
: the DCBMACR field in the foundation segment 
. before OPEN. | 
50°(32) ..2 DCBMACR Major macro instructions and various options 
(Before associated with them. Used by the Open 
OPEN) routine to determine access method. Used by 
the access method executes in conjunction 
with other parameters to determine which load 
modules are required. 
Code 
Byte l : — 
00s -a0X4 Always zero for BSAM. 
] R READ 
ce eK Reserved bits. 
el % P POINT Cwhich implies NOTE). 
care | Cc CNTRL 
Byte 2 BSAM—Output 
51(€33) 00.. ouane Always zero for BSAM. 
tebe 24% W WRITE 
Sheer hes L eas mode BSAM Ccreate BDAM data 
set). 
| eee P POINT Cwhich implies NOTE). 
fidence Cc CNTRL 
.ol BSAM create BDAM processing of 


unblocked spanned records, with 
BFTEK=R specified: The user's program 
has provided a segment work area pool 
and stored the address of the segment 
work area control block in DCBEOBNW. 
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Bytes and Field 


ie Offset Alignment Name Description 
( | Byte 1 QSAM—Input 
i 50¢€32) Osan 2cis Always zero for QSAM. 
re) eee ee G GET 
Qs. jas Always zero for QSAM. 
ae | i ae M Move mode. 
ee ree L Locate mode. 
ee Cc CNTRL 
Pare | D Data mode. 
Byte 2 —- 
51°33) iat a) dears Always zero for QSAM. 
ae owe dace P PUT 
..0. Sracte Always zero for QSAM. 
re | ate te M Move mode. 
ie a bye L Locate mode. 
ao Cc CNTRL 
ee D Data mode. 
50032) Byte 1 = 
002% «65% Always zero for BPAM. 
1 ee R READ 
aoe a oe P POINT (which implies NOTE) 
20 eM KX Reserved bits. 
51¢€33) Byte 2 — 
00.. aig) deus Always zero for BPAM. 
ae Boose W WRITE 
eirere te are P POINT (which implies NOTE). 
2e eX XXX Reserved bits. 
( DIRECT ACCESS STORAGE DEVICE INTERFACE 
Bytes and Field 
Offset Alignment Name Description 
16¢10) 1 DCBKEYLE Key length of the data set. 
17€11)_—=—-«.1 DCBDEVT Device type. 


0010 0111 2305 Disk Storage Facility, Model 2. 
0010 1001 3330 Disk Storage, Model 1, or 

Mass Storage System (MSS) 

virtual volume. 


0010 1101 3330 Disk Storage, Model ll. 
0010 1010 3340/3344 Disk Storage. 

0010 1011 3350 Direct Access Storage. 

0010 1100 3375 Direct Access Storage. 

0010 1110 3380 Direct Access Storage. 
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MAGNETIC TAPE INTERFACE 


Bytes and Field 
Offset Alignment Name 


Description 


O 


16€10) 1 DCBTRTCH Tape recording technique for 7-track tape. 
Code 
0010 o0oll E Even parity. 
0011 41011 T BCD/EBCDIC translation. 
0001 0011 Cc Data conversion. 
0010 1011 ET Even parity and translation. 
17¢1l1) —-«.«1 DCBDEVT Device type. 
1000 0011 3400 series magnetic tape unit. 
1000 1000 3480 Magnetic Tape Subsystem 
18¢12) +..1 DCBDEN Tape density~-—3400 series magnetic tape 
units. 
Code 7-track 9-track 18-track 
0100 0011 1 556 BPI N/ZA N/A 
1000 0011 2 800 BPI 800 BPI N/A 
1100 0OOoOl1 3 N/A 1600 BPI N/A 
1101 0011 G N/A 6250 BPI N/A 
CARD READER, CARD PUNCH INTERFACE 
Bytes and Field shes a 
Offset Alignment Name Description ; 
16€10) 1 DCBMODE, DCBSTACK 
Code 
1000 C . Column binary mode. 
0100 .... EBCDIC mode. 
PD >.>.> 4 Stacker selection. 
-. O00] 1 Stacker 1 
0010 2 Stacker 2. 
0011 3 Stacker 3. 
17€11)~— 1 DCBDEVT Device type. 
0100 0001 2540 Card Reader 
0100 0010 2540 Card Punch 
0100 0100 2501 Card Reader 
0100 0110 3505 Card Reader 
0100 1100 3525 Card Punch 
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PRINTER INTERFACE 


Bytes and 


Offset Alignment 


16(€10) 


17@11) 


19¢€13) 


1 


2 


ol 


Field 

Name 
DCBPRTSP 
0000 0000 
0000 0001 
0001 90001 
0001 1001 
DCBDEVT 
Byte 0 
0100 1000 
0100 1001 
0100 1011 
0100 1110 
Byte 1 
0010 0000 
0001 0000 
DCBPRBYT 
XXXX XX.. 
teria: wear ed 


Appendix F. 


Description 


Number indicating normal printer spacing. 


Code 

0 No spacing. 

1 Space one line. 

2 Space two lines. 

3 Space three lines. 


Device type. 


1403 Printer 
3211 Printer 
3203 Printer 
3800 Printing Subsystem 


Test-for-printer-overflow mask CPRTOV 
mask). If printer overflow is to be 
tested for, the PRTOV macro instruction 
sets the mask as follows: 


Code 

9 Test for channel 9 overflow. 
12 Test for channel 12 overflow. 
Reserved. 


Bits to identify presently active table 
reference character when 3800 printer is 
operating under OPTCD=J. 
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ACCESS METHOD INTERFACE 





BSAM, BPAM Interface 


Bytes and Field 


Offset Alignment Name Description 
52034) 1 DCBOPTCD Option codes. 
Code 
Late: “eee W Write-validity check (CDASD). 
ee  velalars U Allow a data check caused by an invalid 


character. (1403 printer with UCS 
feature. ) 
Window processing requested. (MSS) 

B Treat EOF and EOV labels as EOV labels 
which allows SL or AL tapes to be read 
out of order. (Magnetic tape. ) 

re ier ee Cc Chained scheduling. 

Input Tape Files: Requests the 
testing for and bypassing of any 
embedded DOS checkpoint records 
encountered. (This code can only 
be specified ina JCL statement. ) 
An ISCII/ASCII data set is 

to be processed. | 
Magnetic tape devices: Use reduced 
error recovery procedure. 

BSAM only: user totaling. 

Specifies that the first data byte 
in the output data line will bea 
3800 table reference character for 
dynamic selection of character sets. 


57039) .3 DCBSYNAD Address of user's synchronous error 
routine to be entered when a permanent 
error occurs. 


62(03E) ..2 DCBBLKSI Maximum block size. Maximum value: 32760. 
The maximum block size for Version 3 ISO/ANSI/FIPS 
is 2048. An attempt to process from a Version 
3 tape results ina label validation installation 
exit being taken. 


a 
ja N © 


For fixed-length blocked record format, it 
must be a multiple of the length given in 
DCBLRECL. For variable-length records, this 
must include the 4-byte block length field. 


For more information about ISO/ANSI/FIPS 
spanned records, see 


72048) 1 DCBNCP Number of channel programs. Number of 
READ or WRITE requests that may be issued 
prior to a CHECK. Maximum number: 99. 





218 MVS/XA Data Administration: Macro Instruction Reference 











Offset 
80(€50) 


81(¢51) 
82052) 





Bytes and 
Alignment 


1 


Field 
Name 


DCBUSASTIZ 
DCBLBP 


ra rer 


DCBBUFOF 
DCBLRECL 





Description 


ISCII/ASCII tape. 
Block prefix. 


Block prefix is a 4-byte field containing 
the block length. 


Block prefix length. 


Logical record length. For fixed-length 
blocked record format, the presence of 
DCBLRECL allows BSAM to read truncated 
records. For undefined records, this field 
contains block size. 
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QSAM Interface 


Offset 
52034) 


57039) 


62C03E) 


80050) 


81051) 


Bytes and 
Alignment 


1 


Field 
Name 


DCBOPTCD 


DCBSYNAD 


DCBBLKSI 


DCBUSASIZ 
DCBLBP 


fe irae 


DCBBUFOF 


Description 
Option codes. 


Code 

W Write-validity check (DASD). 

U Allow a data check for an invalid 
character. (1403 printer with UCS 
ect Window processing requested. 

B Treat EOF and EOV labels as EOV 
labels, which allows SL or AL tapes 
to be read out of order (magnetic 


tape). 
Cc Chained scheduling. 
H Input Tape Files: Requests the 


testing for and bypassing of any 
embedded DOS checkpoint records 
encountered. (This code can only 
be specified ina JCL statement.) 
Q An ISCII/ASCII data set is to 
be processed. 
Same as DCBOPTQ. BSAM only. 
Z Magnetic tape devices. Use reduced 
error recovery procedure. 
User totaling. 
Specifies that the first data byte in 
the output data line will be a 3800 
table reference character. 


Ge =f 


Address of the user's synchronous error 
routine to be entered when a permanent error 
occurs. 


Maximum block size. Maximum value: 32760. 

The maximum block size for Version 3 ISO/ANSI/FIPS 
is 2048. An attempt to process from a Version 

3 tape results ina label validation installation 
exit being taken. 


For fixed-length blocked record format, 
it must be a multiple of DCBRECL. For 
variable-length records this must include 
the G-byte block length field provided by 
the access method. 


ISCII/ASCII tape. 
Block prefix. 


Block prefix is a 4-byte field containing 
the block length. (CBUFOFF=L was specified). 


Block prefix length. 
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Bytes and Field 
Offset Alignment Name Description 


82052) ..2 DCBLRECL Format-F records: Record length. 
: Format-U records: Block size. 
Format-V records -—— 
e Unspanned record format — 
GET: PUTX; record length. 
PUT: Actual or maximum record length. 
e Spanned record format — 
Locate mode — 
~ GET: Segment length. 
— PUT: Actual or minimum segment 
length. 
Logical record interface — 
~ Before OPEN: Maximum logical record 
length. 
—- After GET: Record length. 
— Before PUT: Actual or maximum 
| record length. 
—- ISO/ANSI/FIPS spanned record format 
with XLRI; length of the record area 
in 'K* units (1024). 
Move mode -— 
—- GET: Record length. 
—- PUT: Actual or maximum record 
length. | 
e Data mode, GET — 
Data records up to 32752 bytes: Data 
length. 
Data records exceeding 32752 bytes: 
—- Before OPEN: X*'8000' 
—- After OPEN: Data length. 
e Output mode, PUTX Coutput data set): 
Segment length. 


( 84054) 1 DCBEROPT Error option. Disposition of permanent errors 
if the user returns from a synchronous error 
exit (DCBSYNAD), or if the user has no 
synchronous error exit. 





100. .... ACC: Accept. 

O10. .... SKP: Skip. 

O01. Pera ABE: Abnormal end of task. 

1x XXXKX Reserved bits. 
85¢€55) 3 DCBCNTRA Address of CNTRL module. 
88(58) 2 | Reserved. 
90(5A) 2 DCBPRECL Block length, maximum block length, or’ 
data length : 

92(5C) 4 DCBEOB Address of end of block module. 
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DATA CONTROL BLOCK=—ISAM 


Offset 
16(10) 
1711) 


20¢14) 


21015) 
24018) 
32¢20) 


33021) 


36024) 


37(25) 
4202A) 


Bytes and Field 
Alignment Name 


1 


ca 


so 
ine 


DCBKEYLE 
DCBDEVT 
0000 0111 
0000 1001 


0000 
0000 
0000 
0010 
0010 


DCBBUFNO 


DCBBUFCB 
DCBBUFL 
DCBBFALN 


0 oe MK 
01 
Ll 


DCBEODAD 


DCBRECFM 


DCBEXLST 
DCBMACRF 


Description 


Key length. 


Device type. 


2305 Disk Storage Facility, Model 2. 


3330 Disk Storage, 


Model 1, or 


Mass Storage System (MSS) 

virtual volume. 

3330 Disk Storage, Model ll. 

3340 Disk Storage. 

3350 Direct Access Storage. 

3375 Direct Access Storage. 

3380 Direct Access Storage, all models. 


Number of buffers required for this data set: 


0-255. 


Address of buffer pool control block. 


Length of buffer: 


0 - 32760 bytes. 


Buffer alignment: 


Code 


D 
FE 


F 


Reserved bits. 

Doubleword boundary. 

Fullword not a doubleword boundary, 
coded in the DCB macro instruction. 
Fullword not a doubleword boundary, 
coded in the DD statement. 


Address of a user-provided routine to handle 
end-of-data conditions. 


Code 
F 


nA wasce 


=> 


Exit list. 


Record format. 


Fixed length records. 
Variable length records. 
Undefined length records. 
Track overflow. 
Blocked records. May not occur with 
undefined (U). 

Standard records. No truncated blocks 
or unfilled tracks are embedded in the 
data set. 

ISO/ANSI/FIPS control character. 

Machine control character. 

No control character. 

Key length CKEYLEN) was specified in 

the DCB macro instruction; this bit is 
inspected by the open routine to prevent 
overriding a specification of KEYLEN=0 
by a nonzero specification in the JFCB 
or data set label. 


Address of a user-provided list. 


Macro instruction reference after OPEN: 


Contents and meaning are the same as those 
of the DCBMACR field before OPEN. 
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om Bytes and Field 
( | Offset Alignment Name Description 


50032) ..2 DCBMACR Macro instruction reference before OPEN: 
specifies the major macro instructions and 
various options associated with them. Used 
by the Open routine to determine access 
method. Used by the access method executors 
in conjunction with other parameters to 
determine which load modules are required. 


Code 
Byte 1 BISAM 
50032) 00.0 OO... Always zero for BISAM. 
eS: teas R READ 
Lis S Dynamic buffering. 
Pare leet C CHECK 
Sa. < Reserved bit. 
Byte 2 BISAM 
51033) 00.0 0000 Always zero for BISAM. 
peeke  ~chw W WRITE 
Byte 1 QISAM 
50032) 0.0. .0.. Always zero for QISAM. 
oes nates eens G GET 
re err as M Move mode of GET. 
2 “hows L Locate mode for GET. 
1 xX Reserved bits. 
Byte 2 QISAM 
51¢€33) } ae ee S SETL 
ae ee aa te P PUT or PUTX. 
Par | ae re Always zero for QISAM. 
Pee ae M Move mode of PUT 
ct, . Weatete L Locate mode of PUT. 
: i are U Update in place (CPUTX). 
ee K SETL by key. 
are | I SETL by ID. 
52034) 1 DCBOPTCD Option codes: 
Code 
Dias “eaiebu W Write-validity check. 
a eer aan U Full-track index write. 
ee ae M Master indexes. 
ae | i ee I Independent overflow area. 
ee nner Y Cylinder overflow area. 
Sais L Delete option. 
ee | R Reorganization criteria. 
oer Reserved bit 
53035) = .1 DCBMAC Extension of the DCBMACRF field for ISAM. 
Code 
XXKK 2.6 eK Reserved bits. 
a eee ke U Update for read. 
PS ee U Update type of write. 
a A Add type of write. 
54(036) ..1 DCBNTM Number of tracks that determines the 


development of a master index. 
Maximum permissible value: 99. 


55€37) = «...1 DCBCYLOF The number of tracks to be reserved on each 
prime data cylinder for records that overflow 
from other tracks on that cylinder. To 
determine how to calculate the maximum number, 
see the section on allocating space for an 
ISAM data set in 
Guide. 
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Offset 
56038) 


60(03C) 


62(03E) 
64040) 


68044) 


70046) 


72048) 


73049) 


80(50) 


81051) 


82052) 
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Bytes and 
Alignment 


G4 


ol 


as 





Field 
Name 


DCBSYNAD 


DCBRKP 


DCBBLKSI 
DCBMSWA 


DCBSMSI 


DCBSMSW 


DCBNCP 


DCBMSHI 


DCBEXCD1 


DCBEXCD2 


o KKK 


DCBLRECL 


Description 


Address of user's synchronous error routine 
to be entered when uncorrectable errors are 
detected in processing data records. 


Relative position of the first byte of the 
key within each logical record. Maximum 
permissible value: logical record length 
minus Key length. 


Block size. 


Address of the storage work area reserved for 
use by the control program when new records 
are being added to an existing data set. 


Number of bytes in area reserved to hold the 
highest level index. 


Number of bytes in work area used by control 
program when new records are being added to 
the data set. 


Number of copies of the READ-WRITE Ctype K) 
channel programs that are to be established 
for this data control block (99 maximum). 


Address of the storage area holding the 
highest level index. 


First byte in which exceptional conditions 
detected in processing data records are 
reported to the user. 


Lower key limit not found. 

Invalid device address for lower limit 

CQISAM only). Record length check (BISAM only). 
Space not found. 

Invalid request. 

Uncorrectable input error. 

Uncorrectable output error CBISAM only). 

Block could not be reached (CBISAM only). 

Block could not be reached Cinput) CQISAM only). 
Overflow record (CBISAM only). 

Block could not be reached Cupdate) CQISAM only) 
Duplicate record CBISAM only) 


Second byte in which exceptional conditions 
detected in processing data records are 
reported to the user (QISAM only). 


Sequence check. 

Duplicate record. 

DCB closed when error was detected. 
Overflow record. 

PUT: length field of record larger than 
length indicated in DCBLRECL. 

Reserved bits. 


Logical record length for fixed-length record 
formats. Variable-length record formats: 
maximum logical record length or an actual 
logical record length changed dynamically 

by the user when creating the data set. 


Macro Instruction Reference 

















Bytes and Field 





Offset Alignment Name Description | 
197¢€C5) =. 1 DCBOVDEV Device type for independent overflow. 

0000 OoOlll 2305 Dask Storage Facility, Model 2. 

0000. 1001 3330 Disk Storage, Model 1, or 

Mass Storage System (MSS) 
virtual volume. 

0000 1101 3330 Disk Storage, Model ll. 

0000 1010 (3340/3344 Disk Storage. 

0000 41011 3350 Direct Access Storage. 

0010 1100 3375 Direct Access Storage. 

0010 1110 3380 Direct Access Storage. 
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Bytes and Field | i. | _ | os ed 
| Offset Alignment Name : Description | | 
: 16(10) 1 DCBKEYLE Key length. 
17€11) # .3 | DCBREL Number of relative tracks or blocks in this 
| 3 | data set. 
20€194) 1 DCBBUFNO Number of buffers required for this data set. 
May range from 0 to 255. 
21¢15) = .3 DCBBUFCB Address of buffer pool control block or of 
dynamic buffer pool control block. 
24(18) 2. DCBBUFL Length of buffer. May range from 0 to 32760. 
32(20) 1 DCBBFALN Buffer alignment: 
OX Reserved bits 
.10 Doubleword boundary. 
01 Fullword not a doubleword boundary, coded in 
the DCB macro instruction. 
ll Fullword not a doubleword boundary, coded in 
the DD statement. 
Kase: Meee Reserved bits. 
32¢20) 1  DCBBFTEK ~~ Buffering technique. 
sats jaca e Reserved bit. 
BAe oh eee R Unblocked spanned records: 


Variable spanned record format. 

Open forms a segment work area pool. 

The number of segment work areas gn OS 
is determined by DCBBUFNO COPEN . ; 
stores the address of the segment Saar 
work area control block in DCBDYNB 

if dynamic buffering is not 

used or in the dynamic buffer Bool 

control block Csee DCBBUFCB) if 

dynamic buffering 1s used. WRITE uses 

a segment work area to write a record 

aS one or more segments. READ uses a 

segment work area to read a record that 

was written as one or more segments. 


36024) 1 DCBRECFM Record format. 
Code 
LOs eee F Fixed record length. 
Ol.. its V Variable record length. 
: i oo ; U Undefined record length. 
‘ae Gee T Track overflow. 
at See B Blocked Callowed. only with VY). 
an S Spanned Sele alata only with V). 


00. Always zer 
ree i Key ehoth CKEYLEN) was specified in 
the DCB macro instruction. This bit 
is inspected by the open routine to 
prevent overriding a specification of 
KEYLEN=0 by a nonzero specification 
in the JFCB or, data set label. 


37025) 3.3 DCBEXLST Exit list. Address of a user- previaed exit 
list control block. 
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Offset 
42(02A) 


50032) 


50(€32) 


51033) 


52034) 


56038) 


62(03E) 
81(51) 





Bytes and 
Alignment | 


sane 


Field 
Name 


DCBMACRF 


DCBMACR 


DCBOPTCD | 


DCBSYNAD 


DCBBLKSI 
DCBLIMCT 
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STM 





Description 
Macro instruction reference after OPEN. 


Contents and meaning are the same as 
DCBMACR before OPEN. 


Macro instruction reference before OPEN: 
major macro instructions and various options 
associated with them that will be used. 


Code 
Always zero for BDAM. 
READ 


R 

K Key segment with READ. 

I ID argument with READ. 

S System provides area for READ (dynamic 

| buffering). 

X Read exclusive. | 

Cc CHECK macro instruction. 

Code 
Always zero for BDAM. 

W WRITE 

K Key segment with WRITE. 

I ID argument with WRITE. 
Reserved bit. 

A Add type of WRITE. 


Unblocked spanned records, with 

BFTEK=R specified and no dynamic 
buffering: The user's program 

has provided a segment work area 

pool and stored the address of . 
the segment work area control 

block in DCBDYNB. 


Option codes: 


Code 
W Write-validity check. 
Track overflow. 
Extended search. 
Feedback. 
Actual addressing. 
Dynamic buffering. 
Read exclusive. 
R Relative block addressing. 


Address of SYNAD (synchronous error) 
routine. 


Maximum block size. 


Number of tracks or number of relative blocks 
to be searched (extended search option). 





UAT PR YY ATUL TH TBO aA nS SPORE ET NRE 








The following describes PDABD fields of the dummy control 
section generated by the PDABD macro instruction. Included are 
the names, attributes, and descriptions of the dummy control 
section. The use of any of the symbolic names provided by the 
dummy section should be preceded by a USING instruction 

- specifying IHAPDAB and a dummy section base register containing 
the address of the actual parallel data access block 


| PDABD 
IHAPDAB DSECT | 
PDANODCB DS H Number of DCB addresses in list 
PDAMAXCB DS H Maximum number of addresses allowed 
PDAGRTNA DS A Address of parallel GET routine 
PDADCBAI DS F DCB address increment 
PDADCBLA DS A Address of last DCB entry 
PDADCBEP DS A Address of DCB entry last processed 
PDAECBIX DS F Index to ECB list 
PDADCBAL EQU % Start of DCB list 
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The following terms are defined as they 
are used in this book. If you do not 
find the term you are looking for, refer 
to the index or to the 

and Office Systems, GC20-1699. 

ABE. abnormal end (value of EROPT) 
ABEND. 


ABSTR. 


abnormal end (macro instruction) 
absolute track (value of SPACE) 


ACC. accept erroneous block (value of 
EROPT) 


access method. A technique for moving 
data between main storage and 
input/output devices. 


address marker. A byte of data ona 
disk or diskette, used to identify the 
data field and ID field in the record. 


AFF. affinity (channel separation 
parameter of DD statement or unit 
affinity value of UNIT) 


AL. American National Standard Labels 
(Value of LABEL). 


alias. (1) An alternate label. For 
example, a label and one or more aliases 
may be used to refer to the same data 
element or point in a computer program. 
(2) An alternate name for a member of a 
partitioned data set. 


ANSI. American National Standards 
Institute 
ASCII. American National Standard Code 


for Information Interchange 


AUL. American National Standard user 
labels (value of LABEL) 


auxiliary storage. Data storage other 
than virtual storage; for example, 
storage on magnetic tape or direct 
access devices. 


basic access technique. Any access 
method in which input/output statement 
causes a corresponding machine 
input/output operation to occur. 
Contrast with queued access technique. 


BCD. binary coded decimal 


BCDIC. binary coded decimal interchange 
code 
BDAM. basic direct access method 


BDW. block descriptor word 











BFALN. buffer alignment Coperand of 
DCB) 

BFTEK. buffer technique Coperand of 
DCB) 

BISAM. basic indexed sequential access 
method 

BLDL. build list (macro instruction) 
BLKSIZE. block size Coperand of DCB) 


block prefix. An optional variable 
length field that may precede unblocked 
records or blocks of records in ASCII on 
magnetic tapes. 


block size. (1) The number of records, 
words, or characters ina block. (2) A 
measure of the size of a block, usually 
specified in units such as records, 
words, computer words, or characters. 


blocking. The process of combining two 
or more records into one block 


BPAM. basic partitioned access method 
BPI. bits per inch 
BSAM. basic sequential access method 


BSM. backspace past tapemark and 
poenete space over tapemark Coperand of 
RL} 


BSP. backspace one block (macro 
instruction) 


BSR. backspace over a specified number 
of blocks Coperand of CNTRL). 


BUFCB. buffer pool control block 
Coperand of DCB) 


buffer. An area of storage that is 
temporarily reserved for use in 
performing an input/output operation, 
into which data is read or ‘om which 
data is written. 


buffer pool. An area of storage in 
which all buffers of a program are kept; 
the buffers are built in extents chained 
together. 


buffer length Coperand of DCB) 


BUFL. 
BUFNO. buffer number Coperand of DCB) 
BUFOFF. buffer offset Clength of ASCII 


block prefix by which the buffer is 
offset; operand of DCB) 


CCHH. The cylinder head record that 
gives the DASD location. 
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CCW. channel command word 

channel program. One or more channel 
command words that control a specific 
sequence of data channel operations. 
Execution of the specific sequence is 
initiated by a single start I/0 
instruction. 


CNTRL. 


CONTIG. contiguous space allocation 
(value of SPACE) 


control character. A character whose 
occurrence ina particular context 
initiates, modifies, or stops a control 
operation. It may be recorded for use in 
a subsequent action, and may have a 
graphic representation in some 


control (Cmacro instruction) 


circumstances. 
control program. A routine, usually 
part of an operating system, that aids 


in controlling the operations and 
managing the resources of a computer 
system. 


CSW. channel status word 
CVOL. See OS CVOL. 
cylinder. (1) In a disk pack, the set 


of all tracks with the same nominal 
distance from the axis about which the 
disk pack rotates. (2) The tracks of a 
disk storage device that can be accessed 
without repositioning the access 
mechanism. 


CYLOFL. number of tracks for cylinder 
overflow records Coperand of DCB) 


D. format-D CISCII/ASCII 
variable-length) records (value of 
RECFM) 


DA. direct access (value of DEVD or 
DSORG) 
DASD. See direct access storage device 
data control block. A control block 


used by access method routines in 
storing and retrieving data. 


data conversion. The process of 
changing data from one form of 
representation to another. 


data definition (DD) statement. A job 
control statement that describes a data 
ahs associated with a particular job 
step. 


data extent block. An extension of the 
data control block that contains 
information about the physical status of 
the data set being processed. 


data set. The major unit of data 
storage and retrieval in the operating 
system, consisting of data ina 
prescribed arrangement and described by 


control information to which the system 
has access. As used in this publication, 
a collection of fixed- or | 
variable-length records in auxiliary 
storage. 


data set control block. A data set 
label for a data set in direct access 
storage. 


data set label. A collection of 
information that describes the 
attributes of a data set and is normally 
cto ale on the same volume as the data 
set. 


DAU. direct access unmovable data set 
(value of DSORG) 


DB. ISCII/ASCII variable-length, 
blocked records (value of RECFM) 


DBS. ISCII/ASCII variable-length, 
blocked spanned records (value of RECFM) 


DCB. See data control block Ccontrol 
block name, macro instruction, or 
parameter on DD statement) 


DCBD. data control block dummy section 
(macro instruction) 


DD. data definition 
DEB. See data extent block 
DECB. 


DEN. 
DCB) 


data event control block 


magnetic tape density Coperand of 


dequeue. To remove items from a queue. 
Contrast with enqueue. 

DEVD. Device-dependent (operand of DCB) 
direct access storage device. A device 


in which the access time is effectively 
independent of the location of the data. 


direct data set. A data set whose 


records are in random order ona direct 
access volume. Each record is stored or 
retrieved according to its actual 
address or its address according to the 
beginning of the data set. Contrast 
with sequential data set. 


directory. (1) A table of identifiers 
and references to the corresponding 
items of data. (2) An index that is 
used by a control program to locate one 
or more blocks of data that are stored 
in separate areas of data set in direct 
access storage. 


DISP. data set disposition (parameter 
of DD statement) 


doubleword. A contiguous sequence of 
bits or characters that comprises two 
computer words and is capable of being 
addressed as a unit. | 
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DS. ISCII/ASCII variable-length, 
spanned records (value of RECFM) 


DSCB. See data set control block 


DSECT. See dummy control section. 
DSORG. data set organization Coperand 
of DCB) 


dummy control section. A control 
section that an assembler can use to 
format an area of storage without 
producing any object code. 


dynamic allocation. The allocation of a 
data set or volume by the use of the 
data set name or volume serial number 
rather than by the use of information 
contained in a JCL statement. 


dynamic buffering. (¢€1) A dynamic 
allocation of buffer storage. 

(2) Allocation of storage for buffers as 
they are needed for incoming data during 
program execution. 


EBCDIC. extended binary coded decimal 
interchange code 


enqueue. To place items on a queue. 
Contrast with dequeue. 


entry point. (1) The address or the 
level of the first instruction executed 
upon entering a computer program, a 
routine, or a subroutine. A computer 
program, a routine, or a subroutine may 
have a number of different entry points, 
each perhaps corresponding to a 
different function cr purpose. (2) Ina 
routine, any place to which control can 
be passed. 


EODAD. End-of-data set exit routine 
address Coperand of DCB) 


EOF. end-of-file 
EOV. end-of-volume 
EROPT. 


ESETL. end sequential retrieval (CQISAM 
macro instruction) 


EXCP. execute channel program (macro 
instruction) 7 


error options Coperand of DCB) 


exit list. A control block that 
contains the addresses of routines that 
receive control when specified events 
occur during execution; for example, 
routines that handle session 
establishment request processing or I/0 
errors. 
EXLST. See exit list Coperand of DCB) 


F. fixed-length records (value of 
RECFM) 


FB. fixed- Seen blocked records 
(value of RECFM) 








FBS. fixed-length, blocked, standard 
records (value of RECFM) 


FET. fixed-length, blocked records with 
track overflow option (value of RECFM) 


FCB. forms control buffer 


FEOV. force end-of-volume (macro 
instruction) 


FIPS. Federal Information Processing 
Standard 
flag. (1) Any of various types of 


indicators used for identification, for 
example, a wordmark. (€2) A character 
that signals the occurrence of some 
condition, such as the end of a word. 


format-D. ISCII/ASCII or ISO/ANSI/FIPS 
variable-length records 


format-F. Fixed-length records 
format-vU. Undefined-length records 
format-V. Variable-length records 


FS. fixed-length, 
(value of RECFM) 


Standard records 


FSM. forward space past tapemark and 
Se ad over tapemark Coperand of 
CNTRL) 


FSR. forward space over a specified 
Aa of blocks Crecords) Coperand of 
CNT 


GCR. group coded recording (tape 
recording mode) 


generation data group. A collection of 
data sets that are kept in chronological 
order; each data set is called a 
generation data set. 


generation data set. One of a 
collection of historically related | 
non-VSAM data sets; the collection of 
these data sets is known as a generation 
data group. 


GL. GET macro, locate mode (value of 
MACRF) 


GM. GET macro, move mode (value of 
MACRF ) 


HA. heme address 


halfword. A contiguous sequence of bits 
or characters that comprise half a 
computer word and is capable of being 
addressed as a unit. 


head. A device that reads, writes, or 
erases data on a storage medium, for 
example, a small electromagnet used to 
read, write, or erase data on magnetic 
drum or magnetic tape, or the set of 
perforating, reading, or marking devices 
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used for punching, reading, or printing 
on perforated tape. 


header label. (1) An qatecnal label 
immediately preceding the first record 
of a file, that identifies the file and 
Son tAd AS data used in file control. 

(2) The label or data set label that — 
precedes the data records on a unit of 
recording media. 


home address. An address written on a 
direct access volume, denoting a track's 
address relative to the beginning of the 
volume. 


IBG. Inter-block gap 


ICF catalog. integrated catalog 
facility catalog | 


INOUT. 


input then sutpue Coperand of 
OPEN) | 3 


integrated catalog facility (ICF). The 
name of the catalog associated with the 
Data Facility Product licensed program. 
internal storage. Storage that is 
accessible by a computer without the use 
of input/output channels. 

I/O. input/output 

IOB. input/output block 

IPL. ainitial program load 

IRG. interrecord gap 

IS. indexed sequential Cvalue of DSORG) 
ISAM. indexed sequential access method 


Iscrli. International Standard Code for 
Information Interchange 


Iso. International Organization for 
Standardization 


ISU. indexed sequential unmovable 
Cvalue of DSORG) 


JOL. yjob control language 

JFCB. job file control block 

JFCBE. job file control block extension 
K. 1024 Chytes) 

Key. One or more consecutive characters 
taken from a data record, used to 
identify the record and establish its 
order with respect to other records. 
KEYLEN. key length Coperand of DCB) 
jocate mode. A way of providing data by 
pointing to its location instead of 
moving it. 


logical record. (1) A record from the 


standpoint of its content, function, and 


use rather than its physical attributes; 
that is, one that is defined in terms of 
the information it contains. (2) A unit 
of information normally pertaining to a 

Single subject; a logical record is that 
user record requested of or given to the 
data management function. 


LPA. link pack area 
LPALIB. 


link pack area library 
LRECL. logical record length Coperand 
of DCB) 


LRI. logical record interface 


M. machine control code (value of 
RECFM) 


MACRF. 
of DCB) 


macro instruction form Coperand 


master catalog. A key~-~sequenced data 
set with an index containing extensive 
data set and volume information required 
to locate data sets, to allocate and 
deallocate storage space, to verify the 
authorization of a program or operator 
to gain access to a data set, and to 
accumulate usage statistics for data 
sets. 
member. A partition of a partitioned 
data set. | 


MOD. modify data set (value of DISP) 
move mode. A transmittal mode in which 
the record to be processed 1s moved into 
a user work area. 


MSHI. main storage for highest-level 
index Coperand of DCB) 


MSS. IBM 3850 Mass Storage System 
MSVC. 


MSWA. main storage for work area 
Coperand of DCB) 


Mass Storage Volume Control 


NCP. number of channel programs 
Coperand of DCB) 


non-VSAM data set. A data set created 
and accessed using one of the following 
methods: BDAM, BPAM, BSAM, @SAM, QISAM. 


NOPWREAD. No password required to read 
a data set (value of LABEL) 


NRZI. non-return~to-zero-inverted (tape 
recording mode) 


NSL. nonstandard label (value of LABEL) 
NTM. number of tracks in evlinder index 
for each entry in lowest level of master 
index (operand of DCB) 


operand. Information entered with a 
command name to define the data on which 
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a command operates and to control the 
execution of the command. 


operating system. Software that 
controls the execution of programs; an 
operating system may provide services 
such as resource allocation, scheduling, 
input/output control, and data 
management. 


OPTCD. optional services code Coperand 
of DCB) 


OS CVOL. operating system control 
volume 


GOUTIN. output then input Coperand of 
OPEN) 


partitioned data set. A data in direct 
access stcrage that is divided into 
partitions, called members, each of 
which can centain a program, part of a 
program, or data. Synonymous with 
program library. 


password. A unique string of characters 
stored in a catalog that a program or a 
computer operator at the console must 
supply to meet security requirements 
before the program gains access to a 
data set. 


PCI. program-controlled interruption 
PDAB. parallel data access block 
PDS. partitioned data set 


PE. phase encoding (tape recording 
mode) 


physical record. One or more logical 
records, or occasionally, a part of one 
logical record read inte or written from 
main storage as a unit. 


PL. PUT macro, locate mode (value of 
MACRF ) 


PM. PUT macro, move mode (value of 
MACRF) 


PO. partitioned organization (value of 
DSORG) 


pointer. An address or other indication 
of location. 


POU. partitioned organization unmovable 
(value of DSORG) 


problem program. Any program that is 
executed when the processing unit is in 
the problem state; that is, any program 
that does not contain privileged 
instructions. This inciudes 
IBM-distributed programs, such as 
language translators and service 
programs, as well as programs written by 
a user. 


a printer line spacing Coperand of 





PS. physical sequential (value of 
DSORG) 


PSU. physical sequential unmovable 
(value of DSORG) 


QISAM. queued indexed sequential access 
methods 


QSAM. queued sequential access method 


queued access technique. Any access 
method that synchronizes the transfer of 
data between the computer program using 
the access method and input/output 
devices, thereby minimizing delays for 
input/output operations. 


RACF. See Resource Access Control 
Facility. 


RDBACK. read backward Coperand of OPEN) 
RDW. record descriptor word 
RECFM. record format Coperand of DCB) 


record. A collection of related data or 
words, treated as a unit; for example, 
in stock control, each invoice could 
constitute one record 


register. An internal computer 
component capable of storing a specified 
amount of data and accepting or 
transferring this data rapidly. 


relative address. An address expressed 
as a difference with respect to a base 
address. 


Resource Access Control Facility. A 
licensed program that provides for 
access control by identifying and 
verifying users to the system 
authorizing access to DASD data sets, 
logging detected unauthorized attempts 
to enter the system, and logging 
oo accesses to protected data 
sets. 


oo relative key position Coperand of 
DCB 


RLSE. release unused space (DD 
statement) 


RPS. rotational position sensing 

Save area. An area of main storage in 
which the contents of registers are 
saved. 

scheduling. The ability to request that 
a task set should be started at a 
particular time interval or on 
occurrence of a specified PI interrupt. 
SDW. segment descriptor word 


secondary space. An area of direct 
access storage space which is allocated 
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after the primary space originally 
allocated has been exhausted. 


Sequential data set. A data set whose | 
records are organized on the basis of 
their successive physical positions, 
such as on magnetic tape. Contrast with 
direct data set. 


SER. volume serial number (value of 
VOLUME) 


serialization. In MVS, the prevention 
of a program from using a resource that 
is already being used by an interrupted 
program until the interrupted program is 
finished using the resource. 


SETL. set lower limit of sequential 
retrieval CQISAM macro instruction) 


SF. sequential forward Coperand of READ 
or WRITE) 


SK. skip to a printer channel Coaperand 
of CNTRL) 


SKP. skip erroneous block (value of 
EROPT) 


SL. IBM standard labels (value of 
LABEL) 


SMSI. size of main-~storage area for 
highest-level index Coperand of DCB) 


SMSW. size of main-storage work area 
Coperand of DCB) 


SP. space lines ona printer Coperand 
of CNTRL) 


spooling. (1) The use of auxiliary 
storage as a buffer to reduce processing 
delays when transferring data between 
peripheral equipment and the processors 
of a computer. (2) The reading of input 
data streams and the output of data 
streams on auxiliary storage devices; 
concurrently with job execution, ina 
format convenient for later processing 
or output operations. 


SS. select stacker on card reader 
Coperand of CNTRL) 


substitute mode. A transmittal mode 
used with exchange buffering on which 
segments are pointed to, and exchanged 
with, user work areas. 


subtask. (1) A task that is initiated 
and terminated by a higher order task. 
(2) A task that is restricted from 

communication with an operator device. 


SUL. IBM standard and user labels 
(value of LABEL) 


SVC. supervisor call 


SVCLIB. supervisor call library 


SYNAD. synchronous error routine 
address Coperand of DCB) 


SYSIN. system input stream 
SYSOUT. system output stream 


system residence volume. The volume on 
which the nucleus of the operating 
system and the highest level index of 
the catalog are located. 


T. track overflow option (value of 
RECFM); user-totaling (value of OPTCD) 


TIOT. task I/0 table 


trailer label. A file or data set label 
that follows the data records on a unit 
of recording media. 


TRC. table reference character 


TRTCH. track recording technique 
Coperand of DCB) 


TSO. Acronym of time sharing option. 
TTR. Acronym of track record. 


U. undefined length records (value of 
RECFM) 


UCS. universal character set 
UHL. user header label 


user catalog. <A catalog used in the 
same way as the master catalog, but 
optional and pointed to by the master 
catalog, and also used to lessen the 
contention for the master catalog and to 
facilitate volume portability. 


UTL. user traile label 


V. format-V (variable-length) records 
(value of RECFM) 


VB. variable-length, blocked records 
Cvalue of RECFM) 


VBS. variable-length, blocked, spanned 
records (value of RECFM) 


virtual 170 (VIO). A facility that 
pages data into and out of external page 
storage; to the problem program, the 
data to be read from or written to 
direct access storage devices. 


volume. (1) A data carrier that is 
mounted and demounted as a unit, for 
example, a reel of magnetic tape, a disk 
pack. (€2) That portion of a single unit 
of storage that is accessible to a 
Single read/write mechanism, for 
example, a drum, a disk pack, or a part 
of a disk module. 7 


volume table of contents. <A table ona 
direct access volume that describes each 
data set on the volume. 
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VS. variable-length, spanned records 


( VSAM catalog. virtual storage access 
‘ method catalog 














VTOC. volume table of contents 


XLRI. extended logical record interface 
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A-type address constant 

defined 5 
abbreviations 229-235 
ABEND macro 


BDAM 32 
BPAM 44 
BSAM 58 
list format 206-207 
SAM 83 


absexp defined 5 
absolute expression defined 5 
access methods 

general nage see 


BDAM 
BISAM 37 
BPAM 42 
BSAM 48 
QISAM 64 
QSAM 72 


macro instructions used with 176 
acronyms 229-235 
ACSMETH operand 
SYNADAF macro 166 
actual device addressing 
DAM 34 


QISAM 68 

adding data to a data set 
BDAM 33, 184 
BISAM 39, 181 


BPAM 183 

BSAM 185, 184 
QISAM 98 

QSAM 99 


address feedback 
current block position 130 
next block position 131 
address of buffers 
obtained from a pool 102 
returned to a pool 95, 96 
addressing, types of CBDAM) 34 
aids, coding 2-3 
alias names ina directory 162-163 
alignment of buffers 
BDAM 29 | 


BISAM 37 
BPAM 42 
BSAM 49 


ANSI control characters 
BPAM 
BSAM 61 
QSAM 87 
argument, search 
DAM 34 


QISAM 67 
ASCII data sets 
block prefix 
~BSAM 51 
QSAM 76 
‘restriction 51, 76 
block size 
BSAM 50 
QSAM 75 


buffer length 
BSAM 51 
QSAM 76 

restriction on record format 
BSAM 61 


QSAM 87 
ASCII translation routines 
check routine 
get routine 99 
put routine 127 
write routine 183 
XLATE macro 189 
associated data sets 
closing 2]l 
opening lll 


specifying 
BSAM 55, 57 
QSAM 80, 81 


ATTACH macro 
relationship with BLDL macro 8 
automatic buffer pool construction 
BDAM 29 
BISAM 37 
BPAM 42 
BSAM 48 
QISAM 64-66 
QSAM 72 
automatic checkpoint restart 20 
automatic error options 
See EROPT 
automatic volume switching 
FEOV macro 


backspacing 
P macro 1] 
CNTRL macro 26 
backward read 
open option 112 
read operation 135 
base registers 
dummy sections 89 
macro instructions 5 
basic direct access method 
See BDAM 
basic partitioned access method 
See BPAM 
basic sequential access method 
See BSAM 
BDAM (basic direct access method) 
general description 29 
macro instructions used with 202 
symbolic field names in DCB 226-227 
noe geet ane (DCB macro) 


29 
BISAM 37 
BPAM 42 
BSAM 49 
QISAM 64 
QSAM 73 
BFTEK operand CDCB macro) 
BDAM 30 
BSAM 49 
QSAM 74 
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BISAM (basic indexed sequential access 
method) 

general description 37 

macro instructions used with 202 


symbolic field names in DCB 222-225 


BLDL macro 
description 8-10 
reason codes’ 10 
return codes 10 
use by access method 202 
used with FIND 93 
BLKSIZE operand CDCB macro) 
BDAM 30 
BPAM 42-43 
BSAM 49 
QISAM 64-65 
QSAM 74-75 
block 
backspacing by ll 
count exit 
BSAM 


58 
list format 206 
—~—6QSAM O83 
data control 29 
data event control 190 
descriptor word, relationship with 
BLKSIZE operand 43, 50, 65, 75 
BUFOFF operand 51, 76 
LRECL operand 67 
event control 190, 200 
position feedback 121, 179 
positioning with POINT 121-122 
prefix 
See also BUFOFF operand 
effect on block length 50 
effect on buffer length 51, 76 
effect on data alignment 49, 73 
reading 130-136 
size 
See BLKSIZE operand 
writing 178-185 
block size for SYSOUT data sets 
See also BLKSIZE operand 


BSAM 50 
QSAM 75 
blocking 
data checks CUCS printer) 149 
records 
BDAM 29, 35 
BPAM 42, 46 
BSAM 61 
QISAM 70 
QSAM 87-88 


boundary alignment 
See BFALN operand 

BPAM (basic partitioned access method) 
general description 
macro instructions used with 202 


symbolic field names for DCB 213-219 


BSAM (basic sequential access method) 
general description 48 
macro instructions used with 202 


symbolic field names for DCB 211-216 


BSP macro 
description ll 
reason codes 12 
return codes 12 
use by access method 202 
BUFCB operand (DCB macro) 
BDAM 30 


BISAM 37 
BPAM 50 
BSAM 50 
QISAM 65 
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QSAM 75 

relationship to 
GETBUF macro 102 
GETPOOL macro 103 


buffer 


alignment 
See BFALN operand 
control 
using FREEBUF macro 95 
using FREEDBUF macro 96 
using FREEPOOL macro 97 
using GETBUF macro 102 
using GETPOOL macro 103 
using RELSE macro 141 
forms control 
using SETPRT macro 144 
length 
See also BUFL operand 
BUILD macro 
BUILDRCD macro 15 
for ASCII data sets 5l, 76 
for card image mode 51, 76 
GETPOOL macro 103 
message format (CSYNADAF macro) 168 
pool construction 
See also BUFCB operand 
automatic (see BUFNO operand) 1 
using BUILD macro 13-14 
using BUILDRCD macro 15-16 
using GETPOOL macro 103 
releasing | 
using FREEBUF macro 95 
using FREEDBUF macro 96 
using FREEPOOL macro 97 
using RELSE macro 141 
using SYNADRLS macro 169 
specifying number 
See BUFNO operand 
buffering 
dynamic 96 
problem program controlled 
SAM 37 


BSAM 48 
simple 73-74 
specifying 30, 49-50, 73-74 
variable-length spanned record 


BDAM 30 
BSAM 50 
QSAM 74 


using BUILDRCD macro 15-16 
BUFL operand (DCB macro) 
BDAM 31 


BISAM 38. 
BPAM 43 
BSAM 50 


BUFNO operand CDCB macro) 
BDAM 31 — 


BISAM 38 
BPAM 43 
BSAM 51 
QISAM 65-66 
QSAM 76 | : 7 
relationship to CNTRL macro 26 
relationship to NCP operand 38 
BUFOFF operand CDCB macro) | 
BSAM 51-52 
QSAM 76 
BUILD macro 
description 13-14 
relationship to 
BFALN operand 29 
BUFCB operand 30 


Index 237 





BUFL operand 31 
BUFNO operand 31 
use by access method 202 
BUILDRCD macro 
description 
execute form 18 
list form 17 
3 standard form 13-14 
i relationship to 
BUFL operand 76 
BUFNO operand 73 
GET macro 100 
PUT macro 128 
TRUNC macro 175 
use by access method 202 





paeee operand (SETPRT macro) 145, 157, 


Le | 


capacity record (RO) 
relationship with 
READ macro 131 
WRITE macro 178, 184 
card codes 
BSAM 54 
QSAM 79 
card image 
buffer length required 5l, 76 
defined 54, 79 
card punch 54, 79 
card reader 55, 79 
carriage control channel 
CNTRL macro 26-28 
PRTOV macro 123-124 
carriage control characters 
CNTRL macro 26-28 
machine 208-209 
PRTOV macro 123-124 
chained scheduling 


BPAM 46 

BSAM 60 

QSAM 85 
changing partitioned data set member 
name 162-163 
channel 


carriage control 
See carriage control channel 
overflow 123-124 
programs, number of 
M 40 


BISA 
BPAM 45 
BSAM 59 


character arrangement table 
specifying use of 145-146 
character set code 
1403 printer 149 
3203 printer 149 
3211 printer 149 
CHARS operand CSETPRT macro) 146 
CHECK macro 
description 19 
relationship to 
end of data CEODAD) 44, 57 
MACRF operand 33 
operations (NCP) 40, 45, 59 
POINT macro 122 
READ macro 130, 133, 135, 137 
WRITE macro 178, 181, 183, 184 
return of exception codes 191-199 
use by access method 


checking, write-validity 
BDAM 35 


BPAM 46. 
BSAM 61 
QISAM 69 
QSAM 86 


checkpoint records, | embedded CDOS) 
CNTRL macro 26 
POINT macro 121 
CHKPT macro 
use by access method 202 
CLOSE macro 
execute form 25 
list form 24 
MVS/370 compatibility 23 
relationship to 
BUILDRCD macro 16 
FREEPOOL macro 97 
POINT macro 12] 
PUT macro 128 
SETL macro 142 
standard form 21-23 
TYPE=T 22 
use by access. method 202 
CNTRL macro 
description 26-28 
restrictions 26. 


specified in MACRF operand (DCB 


macro) 
BSAM 59 
QSAM 84 


use by access method 202 
codes 

See also card codes 

See also completion codes 

See also control characters 

See also conversion 

See also exception code 

See also return codes 


card 
BSAM 54 
QSAM 79 
completion 


See code, return 
control character 
See control characters 
conversion. 
ASCII to EBCDIC 19, 99, 189 
EBCDIC to ASCII 183, 189 
XLATE macro 189 
exception 191-199 
return 
BLDL macro 10 
BSP macro 12. 
FIND macro 93 
-MSGDISP macro 108 
NOTE macro 110 
POINT macro 122 
RELEX macro 140 
SETPRT macro 150-154 
STOW macro 163-165 
SYNADAF macro 167 
SYNADRLS macro 169 
WRITE macro 186 
coding ! | 
aids 2-3 
macro instructions 1-7 
registers as operands 5 
column, binary | 
See also card image 
eliminate mode, read column 


BSAM 54, 56 
 QSAM~ 80 
compatibility 
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MVS/XA with MVS/370 23, 114 
= completion codes 
Po BLDL macro 10 
| BSP macro 12 
FIND macro 93 
MSGDISP macro 108 
NOTE macro 110 
POINT macro 122 
RELEX macra 140 
STOW macro 163-165 
SYNADAF macro 167 
SYNADRLS macro 169 
WRITE macro 186 
completion testing of I/0 
operations 19, 
condition, exception 190-199 
construct 
a buffer pool | 
See buffer pool construction 
a data control block — 
See DCB macro : 
a DECB (data event control 
block) 190 
contents of registers on entry to 
exit list 207 
SYNAD 197-199 
control 
characters 208-209 
I/70 device 26-28, 123 
page format 123-124 
printer ene 144-149 
releasin 
buffer CFREEBUF macro) 95 | 
buffer pool (CFREEPOOL macro) 97 
data block CRELEX macro) 1490 
dynamically acquired buffer 96, 


- 179. 
( QSAM buffer CRELSE macro) 141 
requesting 
buffer (GETBUF macro) 102 . 
data block 103 
control blocks 1, 24, 133-137 
buffer pool | 
See BUFCB operand 
data 
See DCB macro 
data event 190 
event 0 
control characters 
CNTIRL macro 26-28 
ISO/ANSI/FIPS 210 
machine 208 
PRTOV macro 123-124 


specifying for 
BPAM 46 
BSAM 62 
QSAM 87 


control section 
See DCB macro 
COPIES operand 
ain SETPRT macro 
modifying 149 
' specifying 146 
copy modification module 
specifying 148 
COPYNR operand in SETPRT macro 
modifying 149 
count exit, block 
BSAM 58 
format list 206 
QSAM 83 
cylinder 
index 68 
overflow area 66 





cylinder overflow 
DCB macro 66 
CYLOFL operand (DCB macro) 66 


[> | 


D-format records 
BSAM 61 
QSAM 87 
DASD (direct access storage devices) 
capacity 203-205 
considerations with 
BSP macro 1] 
CLOSE macro 21, 22 
POINT macro 121-122 
interface in DCB 215 
data block 
exclusive control of 130 
locating with POINT macro 121-122 
release of exclusive control 140 
retrieving 98-101, 130-137 
writing 125-129, 178-185 
data check 
blocking and unblocking 60, 86, 148 
restriction with CNTRL macro 26 
data control block 
See DCB 
data control block (DCB) 
DCBNCRHI field 40 
symbolic references to 211-227 
data definition (DD) statement 
See DD statement 
data event control block 
See DECB 
data extent block 
See DEB 
data management | 
parameter list 24, 116 
data mode processing 
GET macro 84, 100 
PUT macro 85, 128 
data prtotection image 
See DPI 
data set 
block size for SYSOUT 50, 75 
closing 21-23 
connecting to IJl11-115 
disconnecting from 21-23 
disposition at close 22 
opening 111-115 
organization 
See DSORG averand 
temporary closing 22-23 
types 
See access methods 
data translation 
See code conversion 
data transmittal modes 
data 84, 100, 128 
locate 98, 99, 125, 127-128 
move 98, 100, 125, 128 
specified in DCB 84 
data, end of 
See EODAD operand 
DCB Cdata control block) 
completing 111 
construction 
See DCB macro 
DCBBLKCT field 27 
DCBEXCD1 field 190 
DCBEXCD2 field 190 


Index 239 





DCBLRECL field 127 
DCBOFLGS field 114 
description | 

See DCB macro 
dummy section for. 89-90 
exit list. | | 

See EXLST operand 
special options with BLDL macro 

DCB ad a 


8-10 


BDAM 
BPAM 44 — 
BSAM 58. 
list format 206-207 
QSAM 83 

DCB macro © 
BDAM 29~36 
BISAM 37-41 
BPAM 42-47 
BSAM 48-63 
QISAM 71 
QSAM 72-88 


use by access method 202 
DCB open exit routine 
relationship to OPTCD operand 34, 61 
restriction with BUILDRCD macro 15 
DCB operands 
description 
See DCB macro 


symbolic names for 211-227 
DCBD macro 
description 89-90 


use by access metnod 202 
DD statement 
See also DDNAME operand 
NOTE macro 109 
OPEN macro 111-113 
POINT macro 121 
relationship to data control 
block 1, 109, 111, 113, 121 
DDNAME operand (DCB macro) 
BDAM 32 
BISAM 38 
BPAM 44 
BSAM 52 
QISAM 66 
QSAM 


77 
DEB Cdata extent block) 


validity checking lll 
deblocking records 
BDAM 29, 35 
BPAM 46 
BSAM 61 
QISAM 70 
DECB (data event control block) 
construction 138, 187 
description 190 
exception code 190-199 
modifying with execute form 139, 188 
requirement with CHECK macro 19 
requirement with FREEDBUF macro 96 
delete option 
description 69 
DEN operand (DCB macro) 
BSAM 53 
QSAM 77 
density, recording 
9ee DEN operand 
descriptor word 
block 


BPAM 43 


BSAM 50, 51, 137 a 
QISAM 65> 67 e 7 
Q S A M : 7 5 & 7 6 Nie nee ca 

record |. = 
-BSAM 51_ | 

~ QISAM 65, 67 

| Sopeah 83 

segment 50, 137 


DEVD eae Ade (DCB macro) 
~ BSAM 52-57. | 

DCBD macro 90 

QSAM 77-82 | 
device addressing, types of CBDAM) 34 
device capacities 203-205 : 
device types in a dummy section 90 
direct data set 

See BDAM data set. 
direct search option 


BSAM. 
QSAM 86 | 
directory, partitioned data set 


obtaining contents with BLDL 8-10 
operations performed by STOW 
macro 162-163 
search by FIND macro 93 
DISP option 
See disposition option 
disposition option 
CLOSE macro 22 
OPEN macro 113 
requirement for 
data set 109 
DOS (Disk Operating System) 
embedded checkpoint records 
CNIRL macro 26 
DOS/O0S interchange feature, | 
specifying 61, 86 ae 
POINT macro 121 
doubleword alignment 
See BFALN operand 
DPI Cdata protection image) 
for BSAM 55, 
for QSAM 80, 81 
DSECT statement 
DCB symbolic names 211 
DSORG operand CCHECK macro) 19 
DSORG operand (DCB macro) 44 
BDAM 32 
BISAM 38 
BPAM 44 
BSAM 57 
QISAM 66 
QSAM 82. 
dummy control section 
DCBD macro 89-90 
PDABD macro 120 
used for DCB 211 
dummy data block ena 
dummy Key 184 
dynamic buffering 
effect on buffer length 31, 37 
effect on number of channel 
programs 40 


extending an ISAM 


184-185 


requesting in READ macro 131, 133 
requesting in WRITE macro 179, 181 
returning buffer to the pool 96, 179 


specified in BDAM DCB 34 
specified in BISAM DCB 40 
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EBCDIC (extended binary coded decimal 
interchange code) 
ASCII translation 
check routine 19 
DCB option 60, 85 
_ GET routine 99. 
“ put- routine 12? 
« Write routine 183 
XLATE macro 189 
ECB Cevent control block) 
ECB operand | 
WAIT macro 176 
ECBLIST operand 
WAIT macro 176 
eliminate mode, read column 
BSAM. 56. 7 
QSAM 80 
embedded checkpoint records (CDOS) 
CNTRL macro 26 
POINT macro 121 
end-of-data © 
See EQDAD operand 
end-of-data routine 
See EOQDAD routine 
end-of-file on magnetic tape, ignoring 
BSAM. 61 
QSAM 8&6 | 
end-of- sequential retrieval 
See ESTEL 
end-of-volume | 
exit. . 
“BSAM_ “58. 
: ~ QSAM” 83 | 
forced (FEOV macro) 92 
entry | | 
to. exit. Poutene 206 
to SYNAD exit routine 190 
EODAD Cend-of-data) routine 
with BSP macro 11 
with CHECK macro 19 
with CNTRL macro 26 
with FEOV macro 92 
with GET macro 98, 101 
with POINT macro 122 
EODAD operand (DCB macro) 


190, 200 


BPAM 44 
BSAM = 57 
QISAM 66 
QSAM 82 


EROPT Cautomatic error options) operand 
(DCB macro) 82-83 
ERP Cerror recovery procedure) 
BSAM 61 
QSAM 86 - 
error enalveees I70 
exception codes 
BDAM 195 
BISAM 191 
QISAM 193 
register contents 
BDAM 199 


BISAM 198 

BPAM 199 

BSAM 199 

QISAM 197 

QSAM 199 
relationship with 

CHECK macro 19 

-CNTRL macro 27-28 

‘DCB macro 61, 86 


GET macro 98, 101 

POINT macro 122. 

PUT macro 126, 128 

PUTX macro 129 

SETL macro 143 

SYNADAF macro 166 
specifying in DCB macro 

BDAM 36 


BISAM 41 
BPAM. 47 
BSAM 61 
QISAM 71 
QSAM 88 
status indicators 

BDAM 200 
BPAM 200 
BSAM 200 
QISAM 190 
QSAM 200 


error codes 
See return codes 
error conditions | 
while opening a data set 115 
error exits 
CHECK macro 19 
CNTRL macro 27-28 
DCB macro 61, 86 
GET macro 98, 101 
POINT macro 122 
PUT macro 126, 128 
PUTX macro 129 
SETL macro 143 | 
SYNADAF macro 166-167 
error option operand (QSAM) 82 
error recovery 
procedure 
for tape 61, 86 
ESETL Cend-of- sequential retrieval) 
macro : 
relationship to 
SETL macro 142 
ESETL Cend-of-sequential-retrieval) 
macro 
description 91 
relationship to 
GET macro 98 
ESTEL. Cend-of-sequential retrieval) 
macro 
use by access method 202 
event control block 
sahied ECB 


| ae DCB open exit poutine 

exception code 190-199 
exclusive control of data block (CBDAM) 

releasing of 

requesting of 130 

specified in DCB 34 
EXCP macro. 

relationship with SYNADAF macro 166 
execute form 

BUILDRCD macro 18 

CLOSE macro 25 

OPEN macro 118 

READ macro 139 

SETPRT macro 159-161 

WRITE macro 188 
exit routine 

See also EXLST operand 

block count 58, 83 

data control block 

See EXLST operand 
end-of-data 
See EODAD operand 


Index 24] 











end-of-volume 58, 83 
error analysis 
See error exits 

FCB image 58, 83 

list format 206 | 

user labeling 58, 83 

user totaling 58, 83 
EXLST cperand (DCB macro) 

BDAM 32 


BISAM 38 

BPAM 44 

BSAM $57 

list format 206— 

QISAM 67 

QSAM 83 
expressions 


absolute fepen 5 
relocatable (relexp) 5 
EXTEND operand COPEN macro) 112 
extended binary coded decimal 
interchange code 
See EBCDIC 
extended logical record interface 
See XLRI 
extended search option 
LIMCT operand 33 
OPTCD cperand 34 





F-format records 
See RECFM operand 
FCB (forms control buffer) 
image 
| deri nine 58, 8&3 
operand CSETPRT macro) 146 
feedback : | 
block position 130, 179 
next address 131 
FEOV macro 
use by access method 202 
use of 
file, end of 
See end-of-file 
FIND macro 
description 93 
reason codes 94 
return codes 93 
use by access method 202 
fixed-length records 
See BLKSIZE operand, RECFM operand 
FLASH operand CSETPRT macro) 
specifying 147 
FLASH operand in SETPRT macro 
modifying 149 


format 

exit list 206 

page 123 

record 
BDAM 35 
BPAM 46 © 
BSAM 61-63 
QISAM 70 
QSAM 87-88 


forms alignment 147 
forms control buffer 

see FCB a | 
forms overlay tiem 147 
forward space CCNTRL fa one): 27 


FREE option 
CLOSE macro 22 
FREEBUF macro 
description 95 
relationship to 
BUILD macro 13 
GETBUF macro 102 
use by access method 202 
FREEDBUF macro | 
description 96 
use by access method 202 
used with BISAM 39, 181 
FREEPOOL macro 
description 97 
relationship to 
CLOSE macro 21 
GETPOOL macro 103 
use by access method 202 
full-track-index write option 69 
fullword boundary alignment | 
See BFALN operand 
FUNC operand (DCB macro) 
BSAM 54-55, 56 
QSAM 79-890, 81 


GET macro 
ASCII translation 99 
data mode (QSAM) 84, 100 


for 
QISAM 98 
QSAM 99-101 
locate mode 
QISAM 68, 98 
QSAM 84, 99 
move mode 
QISAM 68, 98 
QSAM 85, 100 
restriction when using CNTRL 
macro 26, 84 
relationship to 
CNIRL macro 26 
EQDAD (see EODAD operand) 1 
PDAB macro 119 
RELSE macro 141 
SETL macro 142 
specified in DCB macro 


QISAM 68 
QSAM 84 
TYPE=P 101 


use by access method 202 
get routine exits 98, 101 
GETBUF macro 

description 102 

relationship to 

BUILD macro 13 
FREEBUF macro 95 

use by access method 202 
GETPOOL macro 

description 103 

relationship to 

BFALN operand 29 
BUFCB operand 30 
BUFL operand 31 
BUFNO operand 31 
FREEPOOL macro 97 

use by access method 202 

glossary 229-235. 
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fi ; 
S 4 # 
Abe a 








IHADCB dummy section 89 
IHAPDAB dummy section 120 
image 
data protection 
BSAM 55, 57 
QSAM 80, 8l 
Vy control buffer) 58, 83, 


UCS Cuniversal character set) 149 
image mode, card 


BSAM 

QSAM 79 
independent overflow area 69 
index 


cylinder 68 
highest-level 
address of 39 
Size of 40 
master 
number of tracks per level 68 
specified in OPTCD operand (DCB 
macro) 68 
indicators, status 200 
INIT operand (CSETPRT macro) 147 
INOUT operand COPEN macro) 112 
input data sets 


closing 22-23 
opening 111-115 
READ or GET specified in DCB 

BDAM 33 

BISAM 39 

BPAM 45 

BSAM 59 

QISAM 68 

QSAM 84 
reading 

BDAM 130-132 

BISAM 132-133 


BPAM 135-136 
BSAM Cread a direct data set) 137 
BSAM Cread a sequential data 
set) 135-136 
QISAM 98 
QSAM 99-101 
testing completion of I/0 operations 
CHECK 19 
WAIT 176-177 
used with GET macra 99 
INPUT operand (OPEN macro) 112 
INPUT option 
OPEN macro 111 
input/output devices 
card reader and card punch 26 
control of 
CNTRL macro 26-28 
PRTOV macro 123 
magnetic tape 26 
printer 
3505 card reader 
DCB macro 56, 80 
3525 card punch 
CLOSE macro 21 
CNTRL macro 26 
DCB macro 56, 57, 80 
OPEN macro 1 
input/output error analysis 
See SYNAD exit routine 
input/output operations 
completion of 19, 176 
status indicators 200 





interface, DCB 
for BPAM 218-219 
for BSAM 218-219 
for card reader, card punch 216 
for direct access devices 
for magnetic tape 216 
for printer 216 
for QSAM 220 
interface, logical record 
See LRI 
ISAM Cindexed sequential access method) 
See also BISAm, QISAM 
general description 37, 64 
macro instructions used with 202 
symbolic field names in DCB 222-225 
ISO/ANSI/FIPS control characters 
defined 210 


Ls | 


JCL (job control language) 
DD statement, relationship to 
CLOSE macro 1 
data control block (see DDNAME 
operand) 1 
DCB macro 32, 44 
GET macro 99 | 
NOTE macro 109 
OPEN macro 111-112 
POINT macro 121 
PUT macro 125 
LABEL parameter to request ASCII 
translation 19, 99, 127 
JFCBE (job file control block extension) 
exit list format 206 
EXLST operand 83 
relationship with OPTCD parameter 61 
job step | 
checkpoint restart 20 


key (BDAM) | 
address 131 
reading 130 
specifying as search argument 34 
specifying length 2 
writing 9 
key CISAM) 
address 133, 181 
reading 133 
specifying length 67 
specifying position 70 
writing | 
key length 
See KEYLEN operand 
key position, relative (RKP) 70 
key, record 
PUT macro 125 
READ macro 133 
RKP Crelative key position) 
operand 70 — 
SETL macro 142-143 


WRITE macro 181 
KEYLEN operand (DCB macro) 
BDAM 32 


BPAM 45 
BSAM 58 
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QISAM 67 





LABEL operand 
DD statement 19, 99, 127 
labels 
see alse EXLST operand 
exit list format 206 
input data set 86, 92, 111 
output data set 
CLOSE macro. 21 
FEOV macro 92 
OPEN macro IlI1l 
user, processing 58, 83 
LEAVE option 
CLOSE macro 2] 
FEOV macro 92 
OPEN macro 113 
length 
buffer 
See BUFL operand 
key 
See KEYLEN operand 
record 
See LRECL operand 
levels of master index CISAM) 68 
LIMCT operand (DCB macro) 33 
line spacing, printer 
CNTRL macro 26-28 
PRTSP operand (DCB macro) 
BSAM 53-54 
QSAM 78 
LINK macro 
relationship with BLDL macro 8 
list address 
data management 25, 118, 162 
list form 
BUILDRCD macro 17 
CLOSE macro 24 
OPEN macro 116 
READ macro 138 
SETPRT macro 157-158 
WRITE macro 187 
list format, exit 206 
LOAD macro 
relationship with BLDL macro 8 
loading 
FCB (forms control buffer) 146 
UCS Cuniversal character set 
buffer) 149 
locate mode 
BUILDRCD macro 15 
GET macro 
QISAM 98, 99 
QSAM 99 
PUT macro 
QISAM 125 
QSAM 127 
specified in DCB macro 
~~ QISAM 8 
QSAM 84 
logical record interface 
See 
logical record length 
2ee also LRECL operand 
GET macro 99 
PUT macro 125, 127 
PUTX macro 129 
LONG operand 
WALT macro 177 


lower limit of sequential retrieval 
CSETL macro) 142-143 
LRECL operand (DCB macro) 
BPAM 45 


BSAM 58 


LRI (interface logical record) 
invoked by BUILDRCD macro 15 
LRI Clogical record interface) 
provided by QSAM 
specifying in DCB macro CBFTEK) 
used with PUT macro 127 


[Lv ] 


machine control characters 
BPAM 46 


BSAM 62 
a 208-209 
QSAM 87 
MACRF operand (DCB macro) 
BDAM 33-34 
BISAM 39 
BPAM 45 
BSAM 59 
QISAM 67 
QSAM 84 
macro use by access method 202 
meee: cate management 


BSP 1] 
BUILD 13-14 
BUILDRCD 
execute form 18 
list form 17 
standard form 15-16 
CHECK 19 
CHKPT 
CLOSE 
execute form 25 
list form 
standard form 2l- 23 
CNTRL 26-28 
coding 1-3 
DCB for 
29- 36 


FREEDBUF 96 
FREEPOOL 97 
GET for 
QISAM 98 
QSAM 99-101 
GETBUF 102 
GETPOOL 103 
NOTE 109 
OPEN 


execute form 118 
list form 116 
standard form 111-115 
PDAB 119 
PDABD 120 
POINT 121-122 
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PRTOV 123-124 
PUT for 
QISAM 125 
QSAM 127-128 
PUTX 129 
READ for 
BDAM 130-132, 137 
BISAM 132-133 
BPAM 135-136 
BSAM 135-137 
execute form 139 
list form 138 
RELEX 140 
RELSE 141 
SETL 142-143 
SETPRT 
execute form 161 
list form 157-158 
standard form 144-156 
STOW 162-165 
SYNADAF 166-168 
SYNADRLS 169 
TRUNC 175 
WAIT 176-177 
WRITE for 
BDAM 178-180, 184-186 
BISAM 181-182 
BPAM 183 
BSAM 183 
execute form 188 


list form 187 


XLATE 189 


magnetic tape 


backspace 

BSP macro 11 

CNTRL macro 26 
considerations with 

BSP macro 11 . 

CLOSE macro 21-23 

POINT macro 121-122 
density 53, 78 
end-of-file, ignored 61, 86 
FEOV (final volume positioning) 
macro 92 
forward space 26 
interface in DCB 216 
read backward 135 
recording technique 53, 78 


restriction 
NOTE macro 109 
POINT macro 121 


short error recovery procedure 6l, 


86 
Mass Storage System 
MSS 


See 


master index 


highest level in storage 
address of storage area 39 
size of storage area 40 

number of tracks per level 68 

option specified in DCB 68 


MAXDCB operand 


member, 


MF 


PDAB macro 119 
partitioned data set 
complete a list with BLDL macro 8-10 
locate beginning with FIND macro 93 
update directory with STOW 
macro 162-163 
operand 
BUILDRCD macro 17, 18 
CLOSE macro 
OPEN macro 116, 118 
READ macro 138, 139 
SETPRT macro 158, 161 
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WRITE macro 187, 188 
mode 
See also MACRF operand 
card image 
BSAM 54 
QSAM 79 
data CQSAM) 84, 100, 128 
locate 
QISAM 68, 98, 125 
QSAM 84, 99, 127 


move 
QISAM 68, 98, 125 
QSAM 85, 100, 128 
optical mark read 
BSAM 5 


QSAM 80 
read column eliminate 
BSAM 56 


QSAM 80 
scan CQISAM) 68 
MODE operand CDCB macro) 
BSAM 54, 55 
QSAM 79, 80 


MODIFY operand CSETPRT macro) 


modifying a parameter list 


BUILDRCD macro 18 
CLOSE macro 25 
OPEN macro 116, 
READ macro 139 
SETPRT macro 159 
WRITE macro 188 
move mode 
QISAM 
GET macro 98 
PUT macro 125 


118 


specified in DCB 68 
SAM 


100 
128 


GET macro 
PUT macro 


specified in DCB 85 


restriction 26, 85 
MSGDISP macro 
return codes 108 
MSHI operand (DCB macro) 
MSS (Mass Storage System) 
device capacity 203 
in DCB 215, 218, 220 
MSWA operand (DCB macro) 
multiline print option 
BSAM 55, 56 
QSAM 80, 81 
MVS/370 compatibility 23, 


[v ] 


NCP operand (DCB macro) 
BISAM 40 


BPAM 45 
BSAM 59 
next address feedback 
BDAM (creating) 185 
BDAM Cexisting) 131 
NOTE macro 
description 109 


relationship with POINT macro 


restriction 

with BSP macro ll 
return codes 110 
specified in DCB 

BPAM 45 

BSAM 59 
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59 


39 


114 





148 


109 
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use by access method 202 
NTM operand CDCB macro) 69 
number of channel programs 

See NCP operand 
number of tracks per index level 

See NIM operand 





OMR Coptical mark read) mode 
BSAM 56 


QSAM 80 — 
on-line printer 
control 26-28 
skipping 208-209 
spacing 208-209 
online printer 
skipping 123 
spacing 123 
open exit 
See DCB open exit routine 
OPEN macro 
execute form 118 
list form 116 
MVS/370 compatibility 114 
relationship to 
CLOSE macro 21 
DDNAME operand ] 
FEOV macro 92 
GETPOOL macro 103 
NOTE macro 109 
READ macro 135 
WRITE macro 183 
standard form 111-115 
TYPE 113, 116, 118 
use by access method 202 
open operation, testing 113-115 
open options 111-113 
operands 
substitution for 4 
OPTCD operand 
in DCB macro 


BDAM 34 
BISAM 40 
BPAM 46 
BSAM 61 
QISAM 69 
QSAM 85-86 


in SETPRT macro 148 
optical mark read mode 

See OMR 
option codes 

See OPTCD operand 
organization, data set 

See access methods 
OUTIN operand (OPEN macro) 112 
OUTINX operand COPEN macro) 112 
output data set 

closing 21-23 

opening 111-115 

WRITE or oa specified in DCB macro 


BDAM 

BISAM 39 
BPAM 45 

BSAM 59 
QISAM 68 
QSAM 85 

writing | 

BDAM 178-180 


BISAM 181-182 
BPAM 183 


BSAM 183 
BSAM Cwrite to a direct data 
set) 184-185 
QISAM 125, 129 
QSAM 127-128 
OUTPUT operand COPEN macro) 112 
overflow 
area 
independent 69 
channel 123 
exit address CPRTOV macro) 123 
printer carriage 123 


overflow, track 
BDAM 35 
BPAM 46 
BSAM 62 
QSAM 87 


restrictions 87 
chained scheduling 46, 87 
with OPTCD operand 87 
overlay frame 147 
overprinting 123 


[P| 


parallel data access block 
See PDAB 
parameter list construction 
BUILDRCD macro 17 
CLOSE macro 24 
OPEN macro 116 
READ macro 138 
SETPRT macro 157-158 
WRITE macro 
parameter list modification 
BUILDRCD macro 
CLOSE macro 25 
OPEN macro 118 
READ macro 139 
SETPRT macro 159-161 
WRITE macro 188 
partitioned data set 
macro instructions used with 202 
relationship to 
BLDL macro 8-10 
FIND macro 93 
STOW macro 162-163 
PDAB Cparallel data access block) 
constructing 119 
generating a DSECT 120 
symbolic field names 228 
PDAB macro 
use by access method 202 
use of 119 
PDABD macro 
symbolic field names 228 
use by access method 202 
POINT macro 
description 121-122 
relationship to | 
NOTE macro 109 
restriction 
with BSP macro 11 
return codes 122 . 
specified in MACRF operand 
BPAM 4G 


BSAM 59 
use by access method 202 
position feedback 
current block 130, 179 
next block 131, 184 
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etc 





position, relative key (RKP) 70 
positioning volumes 
using CHECK macro 19 
using CLOSE macro 21-23 
using FEOQV macro 92 
using OPEN macro 11] 
using POINT macro 121-122 
prefix, block 
See also BUFOFF operand 
effect on block length 50, 76 
effect on buffer length 51, 76 
effect on data alignment 49, 73 
Print option for 3525 
BSAM 55, 57 
QSAM 79, 8l 
Print Services Facility 
See PSF 
printer 
carriage control 26-124 
character set buffer loading 149 
control characters 208-209 
control information 144 
control tape 123-124 
forms control buffer loading 146 
skipping 26-28, 208-209 
spacing 26-209 
program, channel 
BISAM 40 
-BPAM 45 
BSAM 59 
protection option, data 
BS 5, 
QSAM 80, 81 
PRTOV macro 
description 123 
use by access method 202 
PRTSP operand (DCB macro) 
BSAM 53-54 
QSAM 78 
PSF (Print Services Facility) 
relationship with SYNAD routine 63 
SYS1.FDEFLIB 144 
SYSL.FONTLIB 144 
SYSIL.PDEFLIB 144 
punch, card 54, 79 
PUT macro 
data mode (QSAM) 84, 128 
for 
QISAM 125 
QSAM 111-113 
locate mode 
QISAM 125 
QSAM 127 
move mode 
QISAM 125 
QSAM 128 
relationship with 
PRTOV macro 123 
SYNADAF macro 166 
TRUNC macro 175 
specified in DCB macro 
QISAM 68 
QSAM 84 
use by access method 202 
PUTX macro 
description 129 
output mode 129 
relationship with TRUNC macro 175 
specified in DCB macro 
QISAM 68 
QSAM 85 
update mode 129 
use by access method 202 





QISAM (queued indexed sequential ac 
method) 
general description 64 
macro instructions used with 20 
symbolic field names in DCB 222 


cess 


2 
-225 


QSAM C queued sequential access method) 


general description 72 


macro instructions used with 202 


symbolic field names in DCB ?2l1l 
queued access technique 
See QGISAM and QSAM 





RDBACK operand (COPEN macro) Ile 
read backward 

magnetic tape 112, 135 
read column eliminate mode 


BSAM 56 
QSAM 80 
READ macro 
execute form 139 
for 
BDAM 130-132, 137 
BISAM 132-133 


BPAM 135-136 
BSAM 135-137 
list form 138 
relationship to 
BFTEK operand 36, 49 
BUFL operand 31 
CHECK macro 19 
EQDAD operand 44, 57 
FIND macro 93 
FREEDBUF macro 96 
KEYLEN operand 32 
LIMCT operand 353 
MACRF operand 33, 39, %5, 58 
NCP operand 40, G5, 59 
OPTCD operand 34 
POINT macro 121 
RELEX macro 140 
WAIT macro 176 
WRITE macro 178-180 
specified in DCB macro 
BDAM 33 


BISAM 39 
BPAM 45 
BSAM 58 
standard form 
BDAM 130-132 
BISAM 132-133 
BPAM 135-136 
BSAM Cread direct data set) 
BSAM (read sequential data 
set) 135-136 
use by access method 202 
reason codes 
BLDL macro 10 
BSP macro 12 
FIND macro 94 
SETPRT macro 155 


STOW macro 163-165 
RECFM operand (DCB macro) 
BDAM 35 


Index 
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BPAM 46 


BSAM 61-63 

QISAM 70 

QSAM 87-88 
record 

area 


construction 135 

deletion option CISAM) 69 
format (see RECFM operand) 1 
length (see LRECL operand) 1 


descriptor word, relationship with 


BSAM 51 
QISAM 65, 67 
QSAM 83 
physical 
See BLKSIZE operand 
retrieval 98-101, 130-137 
segment 7 
variable-length, spanned 16, 75 
writing 125-129, 178-185 
recording density, magnetic tape 
BSAM 53 
QSAM 78 
recording technique, magnetic tape 
BSAM 53 


QSAM 78 
register 
contents on entry to 
DCB exit routine 207 
overflow exit routine 123 
SYNAD exit routine 197-199 
DCBD base 89-90 
usage rules 5 
relative addressing 
B 3 
FIND macro 93 
POINT macro 122 
relative key position 790 
release 
buffer 95 
buffer pool 97 
dynamically acquired buffer 96 
exclusive control 179 
QSAM buffer 141 
RELEX macro 
description 1490 : 
relationship to MACRF operand 34 
return codes G0 
use by access method 202 
relexp defined 5 
relocatable expression defined 5 
RELSE macro 
use by access method 202 
use of 14] 
reorganization statistics CISAM) 69 
REREAD option 
CLOSE macro 2i 
OPEN macro 113 
restore data control block 21-23 
return codes 
BLDL macro 10 
BSP macro l12 
FIND macro 93 
MSGDISP macro 108 
NOTE macro 1190 
POINT macro 122 
RELEX macro 140 
SETPRT macro 150-154 
STOW macro 163-165 
SYNADAF macro 167 
SYNADRLS macre 169 
WRITE macro 186 
RETURN macro 
relationship with SYNAD operand 


BDAM 36 

BISAM 41 
BPAM 47 

BSAM 63 

QISAM 71, 210 
QSAM 88 


REWIND option 
CLOSE macro 21 
FEOV macro 92 
REXMIT operand 
SETPRT macro 1469 
RKP (relative key position) operand 
RKP operand (DCB macro) 67 
RO record 
See capacity record 





Save area 
general register requirements 5 
SYNADAF requirement 1] 
SYNADRLS macro 9 
scan mode 68 
search 
partitioned data set directory 
BLDL macro 8-10 
FIND macro 93 
type of 
BDAM 33 
QISAM 68 
search argument 
BDAM 33 


QISAM 67 
search direct option 86 
search option; extended 34 
segment 
buffer 125 
descriptor word 50, 137 
interface, restriction 15 
work area 3] 
sequential access methods 
See access methods 
services, optional 


BDAM 34 
BPAM 46 | 
BSAM 59-60 
QISAM 69 
QSAM 85 
SETL macro 


description 142-143 
relationship to 
ESETL macro 91 
GET macro 98 

use by access method 202 
SETPRT macro | 

blocking/unblocking data checks 

execute form 159-161 

list form 157-158 

printing by print train or band 

reason codes for 3800 155 

return codes 150-154 

selecting UCS and FCB images 144 

standard form 1449-156 

use by access method 202 
simple buffering 
skipping, printer 

See also spacing, printer 

CNTRL macro 26 

control characters 208-209 
SMSI operand (DCB macro) 490 
SMSW operand (DCB macro) 41 
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70 


144 


144 





space, magnetic tape 
backward Ill, 26 
forward 26 
spacing, printer 
See also skipping, printer 
CNITRL macro 26 
control characters 208-209 
specified in DCB macro 
BSAM 53 
QSAM 78 
spanned records 
See variable-length, spanned records 
STACK operand CDCB macro) 
BSAM — » 56 
QSAM 79, &1l 
stacker selection 
CNTRL macro 26-28 
control characters 208-209 
specified in DCB macro 
BSAM 54, 56 
QSAM 79, 81 
standard blocks 
restriction with OPTCD operand 387 
specifying 62, 87 
statistics reorganization CISAM) 69 
status 
following an I/’0 operation 190 
indicators 200 
STOW macro 
description 162-165 
directory action 163 
reason codes 163 
return codes 163-165 
use by access method 202 
summary of changes vii 
switching volumes 
CHECK macro 19 
FEOV macro 92 
symbol defined 4% 
SYNAD exit routine 
exception codes 
BDAM 1964 
BISAM 191 
QISAM 193 
register contents 
BDAM 199 
BISAM 198 
BPAM 199 
BSAM 199 
QISAM 197 
QSAM 199 
relationship with 
CHECK macro 19 
CNTRL macro 28 
DCB macro (see SYNAD operand) i1 
GET macro 98, 101] 
POINT macro 122 
PUT macro 126, 128 
PUTX macro 129 
SETL macro 143 
SYNADAF macre 167 
specifying in DCB macro 


BDAM 36 
BISAM 4] 
BPAM 47 
BSAM 63 
QISAM 71 
QSAM 2&8 
status indicators 
BDAM 200 
BPAM 200 
BSAM 200 
QSAM 200 


SYNAD operand (DCB macro) 
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BDAM 36 
BISAM 41 
BPAM 47 
BSAM 63 
QISAM 71 
QSAM 88 


SYNAD routine 
relationship with PSF (Print Services 
Facility) 63 
SYNADAF macro 
description 166-167 
relationship with SYNADRLS macro 169 
return codes 167 
use by access method 202 
SYNADRLS macro 
description 169 
relationship with SYNADAF macro 166 
return codes 
use by access method 202 
SYNCDEV macro 170 
synchronizing I/0 operations 19, 
176-177 
synchronous error exit 
See SYNAD operand 
SYSIN DD statement 
BSP macro Ll 
CNTRL macro 26 
FEOY macro 92 
MACRF operand 59 
NOTE macro 110 
OPEN macro Ill, 1ll2 
OPTCD operand 60, 86 
PUTX macro 29 , 
RECFM operand 88 
RELSE macro L141 
SYSOUT DD statement 
BSP macro Il 
CNTRL macro 26 
FEOV macro 92 
MACRF operand 459 
NOTE macro 110 
OPEN macro I11, 1ll2 
OPTCD operand 60, 86 
POINT macro 122 
PUTX macro 129 


La] 


table reference character 
See TRC 

tape density, magnetic 
BSAM 


QSAM 78 
tape error recovery procedure 
BSAM 61 


QSAM 86 
tape recording technique 
BSAM 53 


QSAM 78 
temporary clase 
of data set 2] 
termination, abnormal 
check routine 19 
end-of~data 
See EQDAD operand 
uncorrectable I/0 error 
See SYNAD operand 
testing completion of I“0 1 
testing for open data set 1 
totaling exit, user 
BSAM 58 
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list format 206 
QSAM 83 

track addressing, relative 
BDAM 35 


FIND macro 93 

POINT macro 122 
track index write, full 69 
track overflow 


BDAM 35 
BPAM 46 
BSAM 62 
QSAM 87 
restrictions 


chained scheduling 46, 87 
with OPTCD operand 87 
translation 
ASCII to EBCDIC 
CHECK macro 19 
GET macro 99 
XLATE macro 189 
EBCDIC to ASCII 
PUT macro 127 
WRITE macro 183 
XLATE macro 189 
paper tape code 53 
transmittal modes 
See also MACRF operand 
data 84, 100, 128 
locate 98, 99, 127 
move 98, 100, 125, 128 
specifying 68 
TRC (table reference character 
3800) 60, 85, 148 . 
TRICH operand (DCB macro) 
BSAM 53 


QSAM 78 
TRUNC macro 
description 175 
specified in QSAM DCB 85 
use by access method 202 
truncating a block 175 
TYPE=P (GET macro) 101 
TYPE=T (CLOSE macro) 21-23 


records 
5 


G7 
62 
QSAM 87 
UCS Cuniversal character set) 





unblocking data checks 60, 86 


UCS operand (CSETPRT macro) 149 
Deegan checks 
6 


QSAM 86 
SETPRT macro 149 
uncorrectable I/0 errors 
See SYNAD operand 
undefined length records 
See U-format records 
universal character set 
See UCS 
unmovable data sets 
See DSORG operand 
UPDAT operand 
OPEN macro 112, 121, 135 
restriction with POINT macro 
restriction with READ macro 


121 


135 


updating partitioned data set 
directory 162-163 
user 
data in partitioned data set 
directory 
BLDL macro. 8-10 
STOW macro 162-163 
label exit 
BSAM 58 
list format 206 
QSAM 83 
totaling exit 
BSAM 58 
list format 206 
QSAM 83 
USING statement requirement 
DCBD macro 89-90 
PDABD macro 120 





V-format records 


BDAM 35 
BPAM 47 
BSAM 62 
QISAM 70 
QSAM 87. 
validity checking 
BDAM 35 
BPAM 46 
BSAM 61 
QISAM 69 
QSAM 86 


variable-length record (format-V) 
See V-format records 
Variable-length, spanned records 
See also V-format records 
restriction with 
FEOV macro 92 
GET macro 99 
OPTCD operand 60, 87 
using BFTEK 30, 49, 75 
using BUILDRCD macro 16 
using PUT macro 127 
writing for BDAM 184 
volume 
forcing end of 92 
volume positioning 
CHECK macro 19 
CLOSE macro 21-23 
FEOV macro 92 
OPEN. macro 111 
POINT macro 121-122 
volume switching 19, 92 





WAIT macro 
description 176-177 
relationship to 
CHECK macro 19 
MACRF operand 33 
READ macro 130, 133 
WRITE macro 178, 181 
use by access method 202 
work area 
for BISAM . 
address of 41 
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size o 


WRITE macro 


execute f 
list form 
relations 


f 41 


orm 188 
187 
hip to 


BUFL operand 3l 


CHECK 


macro 19 


KEYLEN operand 32 
LIMCT operand 33 


MACRF operand 33; oe 


NCP operand 40, 45, 
OPTCD operand 34 
macro 121 
macro 123 


POINT 
PRTOV 
READ m 
RELEX 
SYNADA 


acro 130 


, 133, 


macro 140 


F macro 


WAIT macro 176 


return co 


des 186 


166 


specified in DCB macro 
BDAM 


BISAM 

BPAM 

BSAM 
standard 


33-35 
39 
45 
58-59 
form 


45 
9 


135 


BDAM Ccreate with BSAM) 
178-180 


BDAM (¢ 
BISAM 
BPAM 
BSAM 


existing) 
181-182 

183 

183 


» 39 


184-186 


testing for completion 19, 176-177 
use by access method 202 

WTOR macro 
relationship with SETPRTI macro 147 


[x] 


XCTL macro 
relationship with BLDL macro 8 
XLATE macro 
use by access method 202 
use of 189 
XLRI Cextended logical record interface) 
BUILDRCD macro 15 
GET macro 


use 
QSAM 84 


Numerics 


3480 magnetic tape subsystem 
record length 03 
3800 Model 3 printer 63, 144 
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